Ich habe ja geguckt wie das bei einer
VCL-Anwendung heißt und sogar Kopiert...
Ich wüsste nicht was ich falsch gemacht haben könnte...
Delphi-Quellcode:
program dc;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
// Classes
{ you can add units after this } Interfaces,
// this includes the LCL widgetset
Forms, main;
{$IFDEF WINDOWS}{$R dc.rc}{$ENDIF}
begin
end.
Delphi-Quellcode:
unit main;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
StdCtrls, ExtCtrls;
type
{ WarnFrm }
WarnFrm =
class(TForm)
warnmsg:TLabel;
public
constructor Create;
end;
implementation
{ WarnFrm }
constructor WarnFrm.Create;
begin
warnmsg:=TLabel.Create;
inherited Create;
end;
initialization
{$I unit1.lrs}
end.