Mam takie wczytanie Z Listboxów do Memo
var
i: Integer;
begin
i:= 0;
while (i < ListBox1.Count) and(i < ListBox2.Count) do
begin
Memo1.Lines.Add(ListBox1.Items[i] + ';' + ListBox2.Items[i])+';'+Edit1.Text[i]; //dołożyłem teraz Edit1.Text
Inc(i);
end;
end;
To samo tylko jak to zrobić na odwrót (z powrotem) ?
z TMemo
do Listbox1
, Listbox2
i Edit1.Text
(Edit1.text w każdym indeksie memo jest taki sam)