1樓:匿名使用者
一個**段:
if checkbox1.checked thenedit1.text='1'
else
edit1.text='0';
要在兩個地方加以處理:
1.初始化時,例如,可以在視窗form的oncreate事件中,加入上述**段;
2.在checkbox1的onclick事件中,也加入上述**段。
當然上述**段也可以做成一個過程,在兩個地方中呼叫該過程。
2樓:匿名使用者
方法1:
procedure form.checkbox1click(sender: tobject);
begin
edit1.tetx := inttostr(ord(checkbox1.checked));
end;
方法2:
procedure form.checkbox1click(sender: tobject);
const
ckvalue: array[boolean] of string=('0', '1');
begin
edit1.tetx := ckvalue[checkbox1.checked];
end;
3樓:匿名使用者
checkbox1click(...)
if checkbox1.checked thenbegin
edit1.text := '1';
end else
edit1.text := '0';
4樓:匿名使用者
在checkbox的onclick事件裡面寫
delphi中的第三方控制元件如何安裝
component中有個install component 然後只要在unit file name中,選擇你要新增的東西,選擇一個你要新增的面板,就跟工具欄上的東東一樣可以使用了.delphi7 如何新增第三方控制元件 如果控制元件是ocx,先使用regsvr32註冊,然後再delphi中匯入 如果...
如何用jquery實現獲取checkbox選中的那一行的in
思路 通過 checked 篩選 checkbox 選中項,然後進行遍歷,利用節點關係獲取到input物件,最後使用val 方法獲取input的內容。例項演示如下 1 html結構 2 jquery function get join alert str 3 效果演示 checkbox checke...
delphi儲存檔案,delphi中如何實現檔案的複製?
還有寫dll檔案是儲存檔名還是標頭檔案名?如 需要呼叫dax.dll檔案,應該儲存習慣建立bin scr tmp doc.用來存放不同的型別檔案。習慣關閉delphi的設定 delphi中如何實現檔案的複製?用copyfile c 123.txt d 123 備份.txt false 最後那個fal...