Ver Mensaje Individual
  #5  
Antiguo 09-11-2012
Suriu Suriu is offline
Miembro
 
Registrado: abr 2007
Posts: 48
Reputación: 0
Suriu Va por buen camino
hola roman

roman es que estaba colgando la image

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,inifiles, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
 Unastring: string;
 Unablee: Boolean;
 IneFex: TIniFile;
begin
  IneFex := TIniFile.Create('\Hola.dat');
  Unastring := IneFex.ReadString('CRCRegistro','General','');
  Edit1.Text := Unastring;
  IneFex.Free;
end;

end.
Responder Con Cita