CopyTableStructure

Материал из Фабиус wiki
Перейти к: навигация, поиск

CopyTableStructure - это процедура

Копирование структуры из текущей таблицы в файл DestFile

CopyTableStructure( <DestFile> )

Пример

local fld, _
fld := ' _1,N,5; '
try
  _ := CreateTmpFile( fld, '_', ~IsFreeDel := true )
  ( _ )->( CopyTableStructure( 'z1.adt' ) )
finally
  CloseTable( _ )
end

В результате в папке TempPath создается файл

22-08-2016 8-11-27.png

Смотрите также

Функции Delphi

Полезные функции