Recordar texto de un TEdit

[albelg]

hola amigos del foro. me gustaria conocer de que forma se puede recordar el valor de un label. O sea, cuando ejecute mi programa por primera vez lleno un label con datos y luego lo cierro y la proxima vez q ejecute dicho programa necesito que permanezca el label con los datos q introduje anteriormente. gracias de antemano

[albelg]

disculpen. no hablo de un label sino de un edit. perdon

[Casimiro Notevi]

Guardándolo al salir y leyéndolo al entrar.
Puedes usar un fichero .ini o una base de datos, etc.

[albelg]

casimiro gracias por responder pero no se como guardar en un fichero .ini ni como leerlo. Si no te es molestia ayudame con eso.

[Casimiro Notevi]

Busca por IniFile

[[nlsgarcia]]

albelg,

Empezado por albelg

...no se como guardar en un fichero .ini ni como leerlo...

Revisa este código:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ComCtrls, ShellCtrls, StdCtrls, IniFiles;

type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Button1: TButton;
    Button2: TButton;
    Button3: TButton;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
    procedure Button3Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

// Salva información de un archivo .ini
procedure TForm1.Button1Click(Sender: TObject);
var
   IniFile : TIniFile;
begin
   try
      IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'IniFile.ini' );
      IniFile.WriteString('Edits','E1',Edit1.Text);
      IniFile.WriteString('Edits','E2',Edit2.Text);
      IniFile.WriteString('Edits','E3',Edit3.Text);
   finally
      IniFile.Free;
   end;
end;

// Lee información de un archivo .ini
procedure TForm1.Button2Click(Sender: TObject);
var
   IniFile : TIniFile;
begin
   try
      IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'IniFile.ini' );
      Edit1.Text := IniFile.ReadString('Edits','E1','');
      Edit2.Text := IniFile.ReadString('Edits','E2','');
      Edit3.Text := IniFile.ReadString('Edits','E3','');
   finally
      IniFile.Free;
   end;
end;

// Reset Edits
procedure TForm1.Button3Click(Sender: TObject);
begin
   Edit1.Text := EmptyStr;
   Edit2.Text := EmptyStr;
   Edit3.Text := EmptyStr;
end;

end.

El código anterior en Delphi 7 sobre Windows 7 Professional x32, Permite leer y grabar información de un archivo .ini, como se muestra en las siguientes imágenes:





Revisa esta información:

1- Manipulate INI files from Delphi

2- Using INI Files

3- Delphi al Límite (IniFiles Página 55)

4- Crear_archivos_INI_pdf_.zip

Espero sea útil

Nelson.

[albelg]

muchas gracias a todos ,realmente me sirvio de mucho.