[delphi] kilka pytan

Jak wykonać jakąś operację po wybraniu np. pierwszego elemntu z listview?
Jak zwiększać rozmiar ikon w listview?
Jak wstawić tekst do memo tyle razy ile jest wpisane w edicie?

procedure TForm1.ListBox1Click(Sender: TObject);
begin
if ListBox1.ItemIndex=0 then ShowMessage('Zaznaczono pierwszy element');
end;

2. Zmień ImageList na taki, który zawiera większe ikony, naczej się chyba nie da.

3. Chyba o to chodzi?

procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
for i:=0 to StrToInt(Edit1.Text)-1 do
Memo1.Lines.Add('Jakiś tekst')
end;

Ewentualnie:

procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
for i:=0 to StrToInt(Edit1.Text)-1 do
Memo1.SelText:='Jakiś tekst';
end;

Zdarzenie OnChange

procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem;
Change: TItemChange);
begin
If Item=ListView1.Items[0] Then ShowMessage('Hurra');
end;