Thema: Delphi Problem mit FormShow!

Einzelnen Beitrag anzeigen

Lennox
(Gast)

n/a Beiträge
 
#3
  Alt 13. Dez 2002, 12:10
Hallo Sakura,

hm vielleicht hätte ich zur besseren Fehlersuche den ganzen Quellcode angeben sollen, habe nämlich nicht ganz verstanden was du meintest.

Delphi-Quellcode:
unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    Edit1: TEdit;
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
   
  end;

var Form1: TForm1;

implementation

{$R *.dfm}
 
procedure TForm1.FormShow(Sender: TObject);
var ini : TIniFile;
begin
  try
    ini:=TIniFile.Create('koordinaten.ini');
    Form1.left:=ini.ReadInteger('Fensterposition','Left',0);
    Form1.top:=ini.ReadInteger('Fensterposition','Top',0);
  finally
    ini.free;
  end;
end;

  
end.
Wenn du mir da noch mal was zu schreiben könntest, wäre ich dir echt dankbar.

Gruss Lennox

[edit=Daniel B]Delphi-Tags; MfG Daniel B.[/edit]]
  Mit Zitat antworten Zitat