[roman]

Empezado por DarkByte

no me gusta el with ... do porque no te sale el menú desplegable

Muy de acuerdo contigo. Si no recuerdo mal, en VB hay que empezar con punto las instucciones en el with:

with Chica do
  if EstasConAlguienAhoraMismo then
    MiraPaOtroLao
  else if .Horrorosa or not .Inteligente or not .BuenaGente then
    Ignorar
  else if .NoTeIgnora then
    MeteEnLaListaDePosibles
  else
    SoloAmiga;

lo cual tiene dos ventajas. Primero, en cuanto pones el punto aparece el menú desplegable y segundo te permite distinguir y utilizar identificadores iguales. Por ejemplo, si tienes un objeto A con propiedades P1 y P2 puedes hacer algo así:

procedure Algo(P1, P2);
begin
  with A do
  begin
    .P1 := P1;
    .P2 := P2;
  end;
end;

Lo que me parece muy conveniente. En fin, hay algunas pocas cosillas de VB que desearía estuvieran presentes en Delphi.

// Saludos