Delphi 与 ACCESS的诡异现象
delphi 2007 + access 2007 +odbc +TADODataset,TADOConnection,TADOCommand
//删除数据
procedure TCDSSelectTools.DeleteMachine(byMachineID: string);
tmpCmd := TADOCommand.Create(nil);
tmpConn := TADOConnection.Create(nil);
tmpConn.ConnectionString := gConnectionStrSelect;
tmpConn.Connected := true;
tmpConn.BeginTrans;
tmpCmd.Connection := tmpConn;
try
tmpCmd.CommandText := 'delete * from t_MachineInfo where sMachineID= ' + '''' + byMachineID + '''';
tmpCmd.Execute;
tmpCmd.Connection.CommitTrans;
finally
tmpCmd.Free;
tmpConn.free;
end;
end;
//3秒钟内执行这个过程肯定会ShowMessage
procedure TCDSSelectTools.GetMachine(byMachineID: string);
tmpDS := TADODataset.Create(Nil);
tmpDS.ConnectionString:= gConnectionStrSelect;
tmpDS.CommandText:='select * from t_MachineInfo where sMachineID= ' + '''' + byMachineID + '''';
try
tmpDS.Open;
if tmpDS.Recordcount>0 then
ShowMessage(tmpDS.FieldByName('FFunModelList').AsString); //这里竟然能显示出来
finally
相关问答：
procedure RunFunction;
type
TFunc = function(A: Integer): Integer;stdcall; //这里根据DLL里面函数的声明修改
var
......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
VC++ 中， &变量名。 是什么意思。 Delphi中 和他一样的符号 是哪个、？
大家都认为，C语言之所以强大，以及其自由性，很大部分体现在其灵活的指针运用上。因此，说指针是C语言的灵魂，一点都不为过。同时， ......
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......
