deklaracja procedury :/

Schematyczny fragment kodu:

[code]type
TForm1 = class(TForm)
menu: TBcBarMainMenu;
m_file: TMenuItem;
m_f_new: TMenuItem;
m_f_open: TMenuItem;
// itd..
procedure zapisz;
private
{ Private declarations }
public
{ Public declarations }

end;

var

//... itd..

implementation

uses Unit2, Unit3, Unit4;

{$R *.dfm}

procedure zapisz;
begin
// polecenia procedury
end;[/code]

No i procedura "zapisz" nie widzi komponentów np. menu itd...

<font color="red">Wyskakuje: [Error] Unit1_main.pas(145): Undeclared identifier: 'i tu jakis komponent przykładowy'</span>

Cos źle zdeklarowałem ?

Może spróbuj tak

'procedure zapisz' daj do private albo public

a potem napisz

procedure TForm1.zapisz
begin
{coś tam}
end;

procedure zapisz;

ma być pod a nie nad private, możesz też to dać do public

procedura zapisz musi być po prostu metodą klasy aby widziała zmienne należące do tej klasy

po ludzku: MUSISZ zrobić procedurę TForm1.Zapisz (np) zeby widziala ona komponenty (a są to zmienne) należące do Form1

[code]type
TForm1 = class(TForm)
menu: TBcBarMainMenu;
m_file: TMenuItem;
m_f_new: TMenuItem;
m_f_open: TMenuItem;
// itd..
procedure zapisz;
private
{ Private declarations }
public
{ Public declarations }

end;

var

//... itd..

implementation

uses Unit2, Unit3, Unit4;

{$R *.dfm}

procedure TForm1.zapisz;
begin
// polecenia procedury
end;[/code]

DETOX: a wiesz, czym się różni procedura od metody??
Polecam oczywiście moją stronkę. Sekcja: obiekty.

DETOX: a wiesz, czym się różni procedura od metody??
Polecam oczywiście moją stronkę. Sekcja: obiekty.

Metoda to procedura lub funkcja należąca do klasy :)