Hallo und guten Morgen.
Ich habe ein klitzekleines Problem. Ich "baue" gerade ein Projekt nach und möchte dafür aus meiner bereits vorhandenen Menüzeile den Punkt "Über" mit einer Infobox belegen. Ich stoße dabei jedoch schon auf das Problem mit der .dfm Datei zur zugehörigen
Unit.
Diese habe ich im Originalprojekt so abgeändert, wie sie sein soll (geringerer Leistungsumfang sprich weniger Erklärung über die Arbeit des Programmes in der Infobox). Implementiere ich nun die
pas +
dfm Datei in mein eigenes Projekt, wird mir folgender Fehler im kompilierten Programm ausgegeben:
http://qs.lc/0ct1f
Erstelle ich jedoch wiederum nur eine neue
Unit, so wird mir logischerweise schon weit vorher der Hinweis gegeben, dass es keine
dfm Datei zur
pas Datei der
Unit gibt.
Meine Frage wäre jetzt folgende: Der Quellcode der
Unit steht soweit, ich krieg sie halt nur nicht korrekt und fehlerfrei ins Programm hinein. Wie also erstelle ich eine funktionierende
Unit bzw. .pas Datei mit zugehöriger .dfm, sodass ich diese Infobox ins Programm kriege.
Delphi-Quellcode:
unit uInfoBox;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, Buttons, ExtCtrls,
Vcl.Imaging.pngimage;
type
TInfobox =
class(TForm)
Panel1 : TPanel;
ProgramIcon : TImage;
ProductNameLbl: TLabel;
VersionLbl : TLabel;
CopyrightLBL : TLabel;
OKButton : TButton;
CompilerLbl : TLabel;
CopyMmo: TMemo;
procedure OKButtonClick(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Infobox: TInfoBox;
implementation
{$R *.dfm}
procedure TInfoBox.OKButtonClick(Sender: TObject);
begin
Close;
end;
end.
Der Befehl im Code des Hauptprogrammes sieht kurz und knapp so aus:
Delphi-Quellcode:
procedure TForm1.AboutMenuClick(Sender: TObject);
begin
Infobox.Show;
end;
Danke im Voraus
