Delphi-Quellcode:
if Combobox1.Text =('') then
Showmessage('Bitte geben Sie einen Suchbegriff ein')
else
Combobox1.AddItem(Combobox1.Text,nil);
// ab hier geht's mit dem restlichen Programm weiter...
Combobox1.Items.SaveToFile(ExtractFilePath(ParamStr(0))+'Protocoll.pnmd');
...
Du willst wahscheinlich das machen:
Delphi-Quellcode:
if Combobox1.Text =('') then
Showmessage('Bitte geben Sie einen Suchbegriff ein')
else
Begin
Combobox1.AddItem(Combobox1.Text,nil);
Combobox1.Items.SaveToFile(ExtractFilePath(ParamStr(0))+'Protocoll.pnmd');
...
End;
Damit du mehrere Codezeilen im Else aufrufen kannst, musst du (, wie Luckie bereits geschrieben hat,
) deine Befehlen in einen Begin-End-Block packen.
Edit: Soviel zu redundanten Posts
