[ecfisa]

Hola Julyus.

me dice que f es de tipo incompatible?? Por que ??

Creo que es por que esta esperando un tipo de variable y al redefinir TextFile como puntero a Text, le estas enviando un puntero a ese tipo y no la variable de ese tipo.

Pienso que sería más o menos como hacer:

Código Delphi [-]
...
type
  Integer = ^Integer;

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  if Odd(i) then // <- error: Incompatible types
    ...  
end;

Pero no puedo afirmarlo, es una presunción basada en que una función que espera un tipo va a protestar si le enviás otro...


Saludos.