Memo veya Listbox Tek tek okutma?

[umutcanster]

ben boyle bırsey ıstıyorum mesela memo yada listboxda alt alta :

deneme1
deneme2
deneme3

yazılı ben bunları su sekilde okutmak ıstıyorum sırasıyla yani ilk deneme1 sonra deneme2 gibi....

nasıl olabılır?

cok sagolun bugune kadar yaptıgınız yardımlarınızdan.

[Search]

Kod: Tümünü seç

procedure TForm1.Button1Click(Sender: TObject);
var
 index:integer;
begin
    for index :=0 to ListBox1.Items.Count-1 do
         begin
             ShowMessage(ListBox1.Items[index]);
        end;
end;

Memoda degişen fazla bişey yok Lines degerini kullancaksın items yerine

kolay gelsin...