Forum: Algorithmen, Datenstrukturen und Klassendesign
by KodeZwerg,
14. Aug 2018
Ich würde, sobald Dein visuell Nachvollziehbares Produkt soweit funktioniert das Du Verstanden hast Wie & Wieso es nun funktioniert folgendes Vorschlagen:
Steige von ListBoxen für Deine Umwandlung auf zum Beispiel ein Array oder Set um. Auf diese Weise blendest Du für andere aus woraus Deine Umwandlung basiert / non-Visuell sozusagen.
Forum: Algorithmen, Datenstrukturen und Klassendesign
by KodeZwerg,
14. Aug 2018
Ich habe mal was gebastelt was auch mehrere Änderungen zulässt.
procedure TForm1.Button1Click(Sender: TObject);
var
iLines, iString: Integer;
tmp, finish: string;
begin
finish := '';
for iLines := 0 to Memo1.Lines.Count -1 do // -1 eingefügt @ himitsu
begin
tmp := Memo1.Lines.Strings;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by KodeZwerg,
14. Aug 2018
Arbeitet schnarchlangsam aber erfüllt Sinn und Zweck.
procedure TForm1.Button1Click(Sender: TObject);
begin
// Memo2.Text := Memo1.Text;
// Memo2.Text := StringReplace(Memo2.Text,'ErsetzeDas','MitDemHier',);
Memo2.Text := StringReplace(Memo1.Text,'ErsetzeDas','MitDemHier',);
end;