Hola,
Te dejo a ti traducirlo a C++, pero, espero que no te será demasiado complicado:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
item: TListItem;
begin
item := ListView1.Items.Add();
item.Caption := 'This is a test';
item.SubItems.Add('A subitem');
item.SubItems.Add('Another subitem');
end;
No sé si en C++ cabe algo como esto otro, que se vale del "with" de Delphi:
Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
with ListView1.Items.Add do begin
Caption := 'This is a test';
SubItems.Add('A subitem');
SubItems.Add('Another subitem');
end;
end;
De todas formas el resultado sería el mismo en ambos casos.
|