Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Asignar nombre a un fichero a traves de un edit (https://www.clubdelphi.com/foros/showthread.php?t=28656)

pepecharlie67 27-12-2005 19:00:21

Asignar nombre a un fichero a traves de un edit
 
Al intentar asignar al nombre de un fichero(de tipo string)el texto introducido en un edit, no me coge su texto,pregunto,¿como puedo hacer para asignar a un string el texto de un edit?Me dado cuenta que no son del mismo tipo,ya que el texto del edit es de tipo TCaption.Gracias.

delphi.com.ar 27-12-2005 19:04:25

Cita:

Empezado por pepecharlie67
¿como puedo hacer para asignar a un string el texto de un edit?

Código Delphi [-]
var
  Texto: string;
begin
  ...
  Texto := Edit1.Text;
end;


:confused:

pepecharlie67 27-12-2005 19:09:31

Eso mismo es lo que hago yo, y no me sale nada.Gracias de todas maneras.

pepecharlie67 27-12-2005 19:15:13

Veras tengo esto:

Código Delphi [-]
  procedure TForm1.Button2Click(Sender: TObject);
Var
  MiFichero : TIniFile;
  Edad : Integer;
begin
  Fichero:=Edit3.Text;
  Edad := StrToInt (Edit2.Text);
  MiFichero := TiniFile.Create (Fichero);
  MiFichero.WriteString ('Usuario','Nombre',Edit1.Text);
  MiFichero.WriteInteger ('Usuario','Edad',Edad);
  MiFichero.WriteString ('Usuario','es',RichEdit1.Text);
  MiFichero.Free;
end;
y Fichero es del tipo String;

¿Porque no me guarda nada?Gracias

Sotrono 27-12-2005 20:04:56

Hola, como va?.
El fichero sí lo crea y guarda los datos, lo que pasa es que seguramente en el edit3 estas poniendo solo el nombre del fichero y no la ruta. Realiza una busqueda en tu disco rigido con el nombre del fichero y vas a ver que lo encuentra.
Saludos...

delphi.com.ar 27-12-2005 20:07:11

Ademas de lo que te comenta Sotrono... ¿Dónde has definido Fichero?.. Si haces un debug paso a paso.. ¿Que valor tiene Fichero al momento de crear TIniFile?


La franja horaria es GMT +2. Ahora son las 12:42:57.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi