[pascal]
procedure TForm1.ADOTable1good_nameGetText(Sender: TField; var Text: string;
DisplayText: Boolean);
begin
Text := sender.AsString;
end;
[/pascal]
標籤: dbgo
Delphi 交易處理(ADO)
[pascal]
begin
ADOConnection1.BeginTrans;
try
// 資料庫相關操作
ADOConnection1.CommitTrans;
except
on E:Exception do Begin
ADOConnection1.RollbackTrans;
End;
end;
end;
[/pascal]
【Delphi XE4】DBGO MySQL亂碼問題
專案使用DBGO連接MyODBC 3.51時，出現中文是亂碼的冏境。
解決方式在ODBC連線的Detail有一個Character Set設定成big5
問題就解決了～
