1ADOConnection1.GetTableNames(ComboBox1.Items,?False);??//获取所有表名1ADOConnection1.GetFieldNames(ComboBox1.Text,ComboBox2.Items);??//获取表的所有字段名
MoveMemory、CopyMemory 的功能类似, 都是复制内存, 都是调用 Move 过程;MoveMemory、CopyMemory 操作指针; Move 操作实体.还要注意, 它们的参数位置不一样!举例:{例1} var buf1,buf2: array[0..9] of AnsiChar; begin buf1 := 0123456789; buf2 := abcdefghij; Move(buf2[2], buf1[4], 5); ShowMessage(buf1); {0123cdefg9} ShowMessage(buf2); {abcdefghij} end;{例2} var buf1,buf2: array[0..9] of AnsiChar; begi...
Delphi 为我们提供了三个方便的函数: GlobalAllocPtr {简化自 API 的 GlobalAlloc} GlobalReAllocPtr {简化自 API 的 GlobalReAlloc} GlobalFreePtr {简化自 API 的 GlobalFree}读写本程序以外的数据时可以使用它们, 很方便, 譬如: p := GlobalAllocPtr(0, Len); {分配} p := GlobalReAllocPtr(p, Len, 0); {重分配} GlobalFreePtr(p); {释放}注意 GlobalAllocPtr 的第一个参数和 GlobalReAllocPtr 的最...
1、标准写法（单个）：procedure TForm7.Button1Click(Sender: TObject); var strResult:string; begin if InputQuery(请输入密码：, 密码：, strResult) then begincaption:= strResult;end;end; 2、扩展写法（多个）：procedure TForm7.FormCreate(Sender: TObject); var strResult: array of string ; begin setLength(strResult,2); if InputQuery(请输入密码：, [密码：, 重复密码：], strResult) then begin caption:= s...