Delphi - licencia

 
Vista:

licencia

Publicado por carlos barrenechea (1 intervención) el 15/06/2005 10:08:05
Buenos dias,

Mi problema es el siguiente, necesito hacer que al abrirse un formulario si no encuentra un archivo en una ruta específica (por ejemplo C:\prueba.txt) se cierre el programa y sino que me cargue en un campo memo los datos del prueba.txt. Si alguno sabe como se puede hacer esto que por favor me lo comente.

Un saludo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:licencia

Publicado por emilio (78 intervenciones) el 15/06/2005 14:54:22
Mira es facil:

En el evento OnCreate del formulario es donde se lleva a cabo la cosa.

Form1.OnCreate;
begin

if FileExists('c:\prueba.txt') then Memo1.lines.loadfromfile(c:\prueba.txt)
else Application.Terminate; "Listo".

Te explico: primero se pregunta si el archivo existe, si existe la funcion FileExists devolvera True y entonces lo cargamos en el Memo.

Espero q te sirva. Chaoooo.....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar