opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 03:01:07 +08:00
Code Issues Packages Projects Releases Wiki Activity

Issue #436: Implement a new table editor dialog. Nukes both create + alter table dialogs.

Browse Source
This commit is contained in:
Ansgar Becker
2009-05-12 22:24:09 +00:00
parent 44f314ff6b
commit 7f32b33505
21 changed files with 2519 additions and 1715 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
source/helpers.pas
View File

@ -138,7 +138,8 @@ type
function RemoveNulChars(Text: WideString): WideString;
procedure debug(txt: String);
function fixNewlines(txt: string): string;
function bool2str( boolval : Boolean ) : String;
function BoolToStr(val: Boolean): String;
function StrToBool(val: String): Boolean;
function GetShellFolder(CSIDL: integer): string;
function getFilesFromDir( dir: String; pattern: String = '*.*'; hideExt: Boolean = false ): TStringList;
function goodfilename( str: String ): String;
@ -1768,15 +1769,20 @@ end;
@param boolean Value to convert
@return string
}
function bool2str( boolval : Boolean ) : String;
function BoolToStr(val: Boolean): String;
begin
if boolval then
if val then
result := 'Y'
else
result := 'N';
end;
function StrToBool(val: String): Boolean;
begin
Result := val = 'Y';
end;
{***
Get the path of a Windows(r)-shellfolder, specified by an integer or a constant