Moin.
Folgendes Problem - ich nutze eine "class function" aus einer anderen
Unit. Die Fehlermeldung ist "Diese Form des Methodenaufrufs ist nur für Klassenmethoden oder Konstruktoren zulässig".
Delphi-Quellcode:
constructor TUpdateLogTool.Create(AOwner: TComponent);
var
iCounter : integer;
lSQLData: TSQLTInhalt;
begin
inherited Create(AOwner);
TDBSQLDaten.Create;
lSQLData := TDBSQLDaten.GetSQLData; <---- Fehler
cmbBoxFrom.Items.Add('6.0.0.0');
cmbBoxTo.Items.Add('7.0.0.0');
gridUpdateLog.Cells[PROJ_CHECKBOXES, 0] := '';
gridUpdateLog.Cells[PROJ_THEME, 0] := 'Thema';
gridUpdateLog.Cells[PROJ_CONTENT, 0] := 'Inhalt';
gridUpdateLog.ColWidths[PROJ_CHECKBOXES] := COLWIDTH_CHKBOXES;
gridUpdateLog.ColWidths[PROJ_THEME] := COLWIDTH_THEME;
gridUpdateLog.ColWidths[PROJ_CONTENT] := COLWIDTH_CONTENT;
//gridUpdateLog.Cells[PROJ_THEME, 1] := 'Test-Thema';
gridUpdateLog.Cells[PROJ_CONTENT, 1] := 'Test-Inhalt';
for iCounter := 1 to gridUpdateLog.ColCount do
AddCheckBox(PROJ_CHECKBOXES, 1);
gridUpdateLog.Options := gridUpdateLog.Options + [goTabs];
ResizeGrid;
end;