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

Sanitize MySQL structure unit:

Browse Source 
* Remove old, unused code (TMysqlIndex, TMysqlField)
* Move relevant code from helpers to mysql_structures unit
* Rename various stuff to more compact names
* Use ordinal values instead of constants for datatypes and their categories
* Replace TGridColumn.IsXYZ boolean's by a new .DatatypeCat property
This commit is contained in:
Ansgar Becker
2009-06-14 19:45:48 +00:00
parent f86330032e
commit d26d93aefa
6 changed files with 233 additions and 305 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
source/routine_editor.pas
View File

@ -105,8 +105,8 @@ begin
comboDataAccess.Items.Add('Modifies SQL data');
comboSecurity.Items.Add('Definer');
comboSecurity.Items.Add('Invoker');
for i := Low(MySqlDataTypeArray) to High(MySqlDataTypeArray) do
comboReturns.Items.Add(MySqlDataTypeArray[i].Name);
for i := Low(Datatypes) to High(Datatypes) do
comboReturns.Items.Add(Datatypes[i].Name);
SetWindowSizeGrip(Handle, True);
InheritFont(Font);
FixVT(listParameters);
@ -336,8 +336,8 @@ begin
EnumEditor := TEnumEditorLink.Create;
EnumEditor.AllowCustomText := True;
EnumEditor.ValueList := TWideStringList.Create;
for i:=Low(MySqlDataTypeArray) to High(MySqlDataTypeArray) do
EnumEditor.ValueList.Add(MySqlDataTypeArray[i].Name);
for i:=Low(Datatypes) to High(Datatypes) do
EnumEditor.ValueList.Add(Datatypes[i].Name);
EditLink := EnumEditor;
end else if Column = 3 then begin
EnumEditor := TEnumEditorLink.Create;