![]() |
Problem mit FormShow!
Hallo,
ich bin noch neu im Thema Delphi und doch schon fasziniert :) Nun möchte aus einer Ini-Datei die Koordinaten für das Programmfenster verwenden, nur bekomme ich beim kompilieren eine Fehlermeldung: Undefinierter Bezeichner: 'Form1Show' mein Quellcode sieht folgender Massen aus:
Delphi-Quellcode:
Kann mir jemand einen Tipp geben was da nicht korrekt ist?
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; Vielen Dank im voraus, Lennox [edit=sakura]Delphi Tags[/edit] |
Versuche mal aus Form1Show ein Form1.Show zu machen bzw. ein FormShow. Je nach dem, was Du erreichen willst.
|
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:
Wenn du mir da noch mal was zu schreiben könntest, wäre ich dir echt dankbar.
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. Gruss Lennox [edit=Daniel B]Delphi-Tags; MfG Daniel B.[/edit]] |
Ah, Du hast die FormShow Methode von Hand angelegt. Jetzt gibt es zwei Optionen für Dich.
1. (die, in diesem Falle, bessere) Quellcode in die Zwischenablage kopieren und anschließend löschen. Jetzt im Form-Designer das Form auswählen, dann zum OI (Objekt Inspektor) gehen und die Seite Ereignisse öffnen und einen Doppelklick auf den Eintrag OnShow ausführen. Anschließend in die eingefügte Methode den Quelltext wieder einfügen. Auf diese Weise kann Delphi Deinen Code besser verwalten 2. Positioniere, im Editor, den Cursor im Bereich
Delphi-Quellcode:
und drücke [Strg]+[Alt]+[C]. Dann musst Du aber noch die Codeverwaltung und das Ereignishandling übernehmen, das wird etwas komplexer.
type
TForm1 = class(TForm) Edit1: TEdit; private { Private-Deklarationen } public { Public-Deklarationen } end; ...:cat:... P.S. Delphi-Code bitte in Zukunft in [ d e l p h i ] und [ / d e l p h i ] Tags einfügen, dann sieht die Darstellung auch schön aus. |
Hallo Lennox und willkommen,
Du hast 3 kleine Problemchen! 1. Das Create der Ini-File, bitte vor! dem try! 2. Benutze bitte beim schreiben von Beiträgen die Delphi-Tags. Werd ich jetzt dann gleich nachträglich ändern. 3. Hier ist eigentlich das Problemchen!
Delphi-Quellcode:
Jetzt geht es. Anscheinend hast DU die Zeile mal gelöscht.
type
TForm1 = class(TForm) Edit1: TEdit; procedure FormShow(Sender: TObject); private { Private-Deklarationen } public { Public-Deklarationen } Oder die Prozedur selbst hingeschrieben, aber vergessen diese Zeile zu ergänzen. Grüsse, Daniel :hi: |
Hallo Daniel,
vielen Dank für die schnelle Hilfe! Habe das Problem verstanden, nun funktioniert es. Gruss Lennox |
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:13 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz