Cita:
Empezado por vtdeleon
Todo es mas largo
|
No es del todo justa la comparación. Por ejemplo, en español escribes
variable siendo que en inglés usas la
abreviatura var.
Vamos a comparar:
Código:
procedure FormCreate(Sender: TObject);
rutina CrearVentana(Emisor: TObjeto);
var
var
N: Integer;
N: Entero;
Path: String;
Ruta: Cadena;
begin
inicio
N := 0;
N := 0;
Path := ExtractFilePath(ParamStr(n));
Ruta := ExtraeRuta(ParamCad(n));
ShowMessage(Path);
MuestraMensaje(Ruta);
end;
fin;
// Saludos