Und wiedermal fehlt ein Semikolon!
-> mobemerkung.Lines.Append(Bemerk)
;
Nachtrag:
Auch hinter dem
else würde ein Semikolon hingehören, aber das geht weil vor
end keines sein "muß". Du solltest dich wirklich erstmal mit der Syntax vertraut machen. Dazu gibt es normalerweise auf der Delphi-CD sehr gute Sprachmanuals als PDF!
Noch'n Nachtrag:
Als Tip für die Zukunft. Die delphi-Tags erlauben leider keine Formatierung mit BBCodes. Stattdessen solltest du für solche Fälle das pre/code-Tag verwenden!
Beispiel:
Code:
var
Bemerk: string;
begin
if InputQuery('Bemerkung ändern','Bemerkung:',Bemerk) then
begin
mobemerkung.Lines.Clear;
mobemerkung.Lines.Append(Bemerk)
[color=red][b]with DataModule1 do[/b][/color]
begin
...