Hallo,
erst mal danke, bin aber noch nicht weiter gekommen.
z.B. hinzufügen einer neuen Zeile im Memo.
Delphi-Quellcode:
procedure TForm.FileMenuItemClick(Sender: TObject);
var i:integer;
begin
if not opendialog.Execute then exit;
for i := 0 to opendialog.Files.count-1 do
(ActiveControl as TMemo).Lines.Add(opendialog.Files[i]);
end;
Da steig mein Programm mit einer Excepption aus.