muchas gracias ecfisa, pero ahora me da error en el showmessage en donde esta marcado en rojo.
Código Delphi
[-]
procedure TForm1.ImprimirClick(Sender: TObject);
var
cont:integer;
begin
for cont:=1 to 3 do
showmessage(inttostr(vendedores[cont].codigo+' '+vendedores[cont].nombre+' '+floattostr(vendedores[cont].sueldo)+' '+floattostr(vendedores[cont].comision));
End;
end;
End.
saludos cordiales!