Nie moge otworzyć drugiej Formy.

0

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

0

w forme MainForm po:

implementation

dopisz uses NEBillFRM;



```delphi
procedure TMainForm.DBGrid1DblClick(Sender: TObject);
begin
  TNEBillForm.Create(Application).Show;
end;
0

wpisałem i mam coś takiego

mainfrm.pas(112,23) Error: Illegal qualifier
niewiem o co chodzi. Powino mi automatucznie dodać forme do Uses jak wpisuje , tak było w Delphi -Mam rację?

dodanie znacznika <code> - @furious programming

0

ok nie doczytałem :/

ale mam coś takiego

mainfrm.pas(84,6) Fatal: Can not find unit NEBillForm used by MainFrm.
jak dobrze zrozumiałem mam to dodać do formy1(MainForm) która pokazuje forme2 (NEBillForm). tak?

dodanie znacznika <code> - @furious programming

0

Kolega Dragon miał racje.

a nie tworzy formy o nazwie NEBIllFRM tylko NEBIllForm

Application.CreateForm(TNEBillForm, NEBillForm);

Coś mi się Lazarus posypał. Nowa instalka i jest ok... Dzięki za pomoc

1 użytkowników online, w tym zalogowanych: 0, gości: 1