Ich verstehe es nicht, es kommt zu folgender Warnmeldung:
Zitat:
[Warnung] Unit1.pas(39): Variable 'Obj' ist möglicherweise nicht initialisiert worden
Dieser Code (vereinfacht):
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i: integer; Obj: TObject;
begin
for i:=0 to Memo1.Lines.Count-1 do
begin
if Memo1.Lines[i]='Parent' then
Obj:=Self // hier initialisiert
else
if Memo1.Lines[i]<>'' then
Obj:=FindComponent(Memo1.Lines[i]) // hier auch initialisiert
else
Continue; // nicht initialisiert, aber Schleife wird ja auch fortgesetzt
if IsPublishedProp(Obj,'Font') then // <--- hier Warnmeldung ---
{...}
end;
end;
Kann mir das einer erklären