Visualizar Contenido de Archivo!!

[dec]

Hola,

¿De qué tipo es el archivo? Si fuera de "texto plano" un "TMemo" puede mostrarlo sin problemas... tal como tratas de hacerlo, con el método de "Lines" "LoadFromFile".

[paucuellar]

Gracias por responderme!,
Asi es, pero no lo muestra me lo deja en blanco, ya cheque el archivo y si tiene información, entonces no se a que se deba, de seguro es una pequeñez pero nadamas no doy... gracias de nuevo

[[seoane]]

Con que programa lo abres para comprobar que tiene información ???

[paucuellar]

hola, con el bloc de notas...

[[seoane]]

Empezado por paucuellar

hola, con el bloc de notas...

Bien, pues con el documento abierto en el bloc de notas, utiliza la opción del menú "Guardar como ..." y cunado aparezca el dialogo "Guardar como" fíjate que pone en el apartado "Codificación" y nos la dices

[paucuellar]

Empezado por seoane

Bien, pues con el documento abierto en el bloc de notas, utiliza la opción del menú "Guardar como ..." y cunado aparezca el dialogo "Guardar como" fíjate que pone en el apartado "Codificación" y nos la dices

jajaja yap gracias estaba en unicode, no se porque, con razon nadamas me ponia un signo raro....gracias me salvaste de reprobar....

[[seoane]]

Se resolvió el misterio

[[egostar]]

Pues con esto deberia de bastar

Código Delphi [-]
 
procedure TForm1.BitBtn1Click(Sender: TObject);
Var
  Archivo: String;
begin
  Archivo := 'C:\STARW\QUERY1.SQL';
  Memo1.Lines.LoadFromFile(Archivo);
end;

Salud OS.

[paucuellar]

Empezado por egostar

Pues con esto deberia de bastar


Código Delphi [-]
procedure TForm1.BitBtn1Click(Sender: TObject);
Var
Archivo: String;
begin
Archivo := 'C:\STARW\QUERY1.SQL';
Memo1.Lines.LoadFromFile(Archivo);
end;





Salud OS.

Gracias! asi mismo lo tengo saluditos