Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
functionCopyTable(tbl: TTable; dest: string
): boolean; var
psrc, pdest: array
[0..DBIMAXTBLNAMELEN] of
char; rslt: DBIResult; begin
Result := False
; StrPCopy(pdest, dest); with
tbl do
begin
try
DisableControls; StrPCopy(psrc, TableName); rslt := DbiCopyTable(DBHandle, True
, psrc, nil
, pdest); Result := (rslt = 0); finally
Refresh; EnableControls; end
; end
; end
;