Witam.
Głupia Sprawa :/
Mam Kilka form w projekcie i nie mogę się odwołać do innej formy niż ta na której pracuje. Przesyłam kod
Pierwsze z projektu :
Program ( nazwa ) ;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, MainFrm, ProcUnt, NEBillFRM, Customerfrm
{ you can add units after this };
{$R *.res}
begin
RequireDerivedFormResource := True;
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TNEBillForm, NEBillForm);
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
**Forma 2 ** ( Pusta ale jest)
unit NEBillFRM;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs;
type
TNEBillForm = class(TForm)
private
{ private declarations }
public
{ public declarations }
end;
var
NEBillForm: TNEBillForm;
implementation
{$R *.lfm}
end.
Procedure pokazujące Forme 2
procedure TMainForm.DBGrid1DblClick(Sender: TObject);
begin
NEBillForm.show;
end;
niewiem gdzie problem bo wywala mi komunikat:
mainfrm.pas(112,13) Error: Identifier not found "NEBillForm"
dodanie znaczników <code> i <code class="delphi">
- @furious programming