怎樣在delphi使用gridDBGridEh,點擊按鈕就新增一行表格,不進行資料庫操作,只需顯示默認資訊就可以了。
請教大神
uj5u.com熱心網友回復:
在你系結的資料源新增一行uj5u.com熱心網友回復:
如何雖C/S:procedure TMID_2_2_Frm.Button3Click(Sender: TObject);
var S,SQL,Date1,ID,err:string;
begin
Date1:=FormatdateTime('yyyy-MM-dd',DateTimePicker3.Date);
DateTimetoString(ID,'yymmddhhnnsszzz',now);
SQL:='INSERT INTO 臺賬_借貸憑證(日期,ID) VALUES('+
#39+Date1+#39+','+
#39+ID+#39+')';
if DataModule1.SocketConnection1.AppServer.MyQuery(SQL,err)
then begin
with DBGridEh1.DataSource.DataSet do
begin
Append;
FieldByName('日期').asString:=Date1;
FieldByName('ID').asString:=ID;
Post;
end;
end;
end;
如果直接操作資料庫:
procedure TMID_2_2_Frm.Button3Click(Sender: TObject);
var S,SQL,Date1,ID,err:string;
begin
Date1:=FormatdateTime('yyyy-MM-dd',DateTimePicker3.Date);
DateTimetoString(ID,'yymmddhhnnsszzz',now);
with DBGridEh1.DataSource.DataSet do
begin
Append;
FieldByName('日期').asString:=Date1;
FieldByName('ID').asString:=ID;
Post;
end;
end;
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/82119.html
標籤:語言基礎/算法/系統設計
上一篇:請教ExportDS.dcu 是什么控制元件里的嗎?
下一篇:DLL 呼叫主程式函式問題
