大家好....
請問一下..前輩...
如何指定當我輸入一個欄位名時就指定只做欄位的事..
EX:
欄位名有: stock_date, stock_no, stock_ip ..........等等,
當我在"EIDT"元件KEY入 欄位名稱為 stock_date 時,
指定 stock_date 這個欄位 做我要做的事,
我的程式如下...
要怎麼修改才會成我要的呢...

[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
date1 : Tdatetime;
begin
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
ADOQuery1.Edit; //編輯 ADOQuery1
date1 := strtodate(ADOQuery1.//<=這行的 Fieldbyname(' ')內的值要怎麼寫
shortdateformat := 'yyyy/mm/dd';
ADOQuery1. //<=這行的 Fieldbyname(' ')內的值要怎麼寫
ADOQuery1.Post; //寫入 ADOQuery1
ADOQuery1.Next;
end;
end;
[/code]

編輯記錄

如果你是用Edit來判斷輸入的field的話
那在Button裡多個參數(不用也可以)
ttField := Edit1.Text
ADOQuery1.ttField ).AsString := datetostr(date1);
===================引 用 shine0989 文 章===================
大家好....
請問一下..前輩...
如何指定當我輸入一個欄位名時就指定只做欄位的事..
EX:
欄位名有: stock_date, stock_no, stock_ip ..........等等,
當我在"EIDT"元件KEY入 欄位名稱為 stock_date 時,
指定 stock_date 這個欄位 做我要做的事,
我的程式如下...
要怎麼修改才會成我要的呢...

[code delphi]
procedure TForm1.Button1Click(Sender: TObject);
var
date1 : Tdatetime;
begin
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
ADOQuery1.Edit; //編輯 ADOQuery1
date1 := strtodate(ADOQuery1.//<=這行的 Fieldbyname(' ')內的值要怎麼寫
shortdateformat := 'yyyy/mm/dd';
ADOQuery1. //<=這行的 Fieldbyname(' ')內的值要怎麼寫
ADOQuery1.Post; //寫入 ADOQuery1
ADOQuery1.Next;
end;
end;
[/code]

------
程式沒有這麼難
只是還沒打通其中要絕

不知道你到底了不了解 FieldByName() 的用意, Field=>欄位 Name=>名稱
也就是FieldByname()裡面放的就是你的欄位名稱 'xxxxx'

謝謝!我了解了!我真的就是初學者,所以才會來這邊問基本的問題!Delphi真是個不簡單的程式...我看我也只好慢慢的研究它了...畢竟要寫出一套程式,並不是一天二天就能完成的,感謝各位大大的回覆,我會好好研究的...謝謝~^ ^

額外一點datetostr(date1)改用 formatdatetime('yyyy/mm/dd',date1)
會減少日後因為日期格式的問題產生錯誤
datetostr有時會讓你找不錯~明明是日期,為何轉成字串會錯
===================引 用 shine0989 文 章===================
謝謝!我了解了!我真的就是初學者,所以才會來這邊問基本的問題!Delphi真是個不簡單的程式...我看我也只好慢慢的研究它了...畢竟要寫出一套程式,並不是一天二天就能完成的,感謝各位大大的回覆,我會好好研究的...謝謝~^ ^

------
程式沒有這麼難
只是還沒打通其中要絕