Issue #74: remove no longer used hackish helper function GetColumnDefaultType()

This commit is contained in:
Ansgar Becker
2019-05-06 06:36:12 +02:00
parent 2f77c9ea8c
commit 97043d368b

View File

@ -331,7 +331,6 @@ type
function StringListCompareAnythingAsc(List: TStringList; Index1, Index2: Integer): Integer;
function StringListCompareAnythingDesc(List: TStringList; Index1, Index2: Integer): Integer;
function StringListCompareByValue(List: TStringList; Index1, Index2: Integer): Integer;
function GetColumnDefaultType(var Text: String): TColumnDefaultType;
function GetImageLinkTimeStamp(const FileName: string): TDateTime;
function IsEmpty(Str: String): Boolean;
function IsNotEmpty(Str: String): Boolean;
@ -2309,13 +2308,6 @@ begin
end;
function GetColumnDefaultType(var Text: String): TColumnDefaultType;
begin
Result := TColumnDefaultType(MakeInt(Copy(Text, 1, 1)));
Text := Copy(Text, 2, Length(Text)-1);
end;
{**
Return compile date/time from passed .exe name
Code taken and modified from Michael Puff