Jak zrobić procedurę globalną w delphi?

0

Chciałam się dowiedzieć, gdzie mam wpisać coś w rodzaju:
procedure MojaProcedura();

tak by ta procedura była widoczna w całym Unit1.
Bo do tej pory pisałam procedury pod:
implementation
{$R *.dfm}

procedure JakasProcedura();
begin

end;

ale jak nad taką procedurą JakasProcedura() wstawię drugą procedurę i niej odwołam się do do JakasProcedura() to wtedy delphi nie zauważy tej procedury, bo jest ona niżej w kodzie, dlatego muszę gdzieś wyżej nad implementation dodać jedną linijkę, by procedura była widoczna wszędzie, mam rację?
Czy np. w sekcji:
private
{ Private declarations }
procedure MojaProcedura();

mogłabym dodać procedurę? Czy powinnam w innym miejscu to zrobić?

0

Co ma sekcja 'private' z klas do modułów?
Poczytaj o modułach, to się dowiesz co należy zrobić...

0

mogłabym dodać procedurę? Czy powinnam w innym miejscu to zrobić?

Generalnie jest tak: sekcja implemenation służy za wnętrze modułu, więc procedura która tam jest, jest globalna, ale nie będzie widoczna z innego modułu/z góry dopóki nie dasz jej deklaracji też w interface.
Jeżeli nie chcesz żeby procedura nie była widoczna na zewnątrz a jedynie w module ale w całym, nie tylko po deklaracji możesz użyć takiej konstrukcji:

implementation
[...]
procedure a();forward;
[...]
procedure b();
begin
 a();
end;
[...]
procedure a();
begin
end;

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