Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
29. Apr 2013
Wie wäre es denn mit einem TOpenDialog?
procedure TDeinForm.DateiOeffnen;
begin
if OpenDialog.Execute then
Memo.Lines.LoadFromFile(OpenDialog.Filename);
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
29. Apr 2013
Genauso wie die Ausgangsfrage ;)
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
29. Apr 2013
Dann trenn den zurückgegebenen String doch einfach am ":" auf und verteile ihn auf die beiden Edits. Das Aufteilen ginge z.B. mit einer TStringlist und deren Eigenschaften Delimiter und DelimitedText, oder aber ganz "klassisch" mit Copy und Pos.
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
29. Apr 2013
Memo.Lines sollte funktionieren.
Oder etwas allgemeiner:
function RandomLine(Src: TStrings): string;
begin
Assert(Assigned(Src), 'Keine Auswahlliste übergeben');
Result := Src;
end;