|
Registriert seit: 31. Aug 2007
Ort: 99974 MHL
695 Beiträge
Delphi 10.1 Berlin Starter
|
Re: Ordner rekursiv durchsuchen bis zu maximaler Tiefe
29. Dez 2009, 15:48
Delphi-Quellcode:
procedure TForm5.Button2Click(Sender: TObject);
begin
if LabeledEdit1.Text<>'' then memo1.Lines[versionline]:='## Interface: ' + LabeledEdit1.Text;
//memo1.Lines.Add('## Interface: ' + LabeledEdit1.Text);
Memo1.Lines.SaveToFile(tocpath);
end;
Wäre das nicht möglich?
Dann stände es anstelle des alten Textes in der originalen Zeile 
Karl-Heinz Populanten von Domizilen mit fragiler, transparenter Aussenstruktur sollten sich von der Translation von gegen Deformierung resistenter Materie distanzieren!
(Wer im Glashaus sitzt sollte nicht mit Steinen werfen) 
|