Problem z funkcjami ró?żnych form

0

Czołem
Mam taki patent i nie wiem jak go wymodzić:
główna forma programu na w uses dodana forme FullScreen na której robię operacje: wyświetlam obrazki i takie tam. Potrzebuje jednak by po naciśnieciu klawisza (funkcja z formy FullScreen.OnKeyDown) odnieść się do procedurki z głównej formy. Nie mogę jej dodać w uses bo mi bład zapętlenia wywala. Juz nawet w głównej doprowadziłem do tego, że 1 procedura obsługuje całą formę FullScreen tylko nie wiem jak ja wywołać.
Jak w delphi zrobić wskaźniek do procedury najprotszej??:

procedure Testuj;

Przekazywanie parametrów funkcji formy podrzędnej FullScreen odpada z powodu masy parametrów, które musiał bym podać?
hilfe? z góry dzięki

0

To może podaj jako parametr jakiś rekord ze wszystkimi opcjami?

0
// UNIT 1
unit u1;

interface

procedure p1;
procedure t1;

implementation
uses u2;

procedure p1;
begin
  writeln('1');
end;

procedure t1;
begin
  p2;
end;

end.

// UNIT 2
unit u2;

interface

procedure p2;
procedure t2;

implementation
uses u1;

procedure p2;
begin
  writeln('2');
end;

procedure t2;
begin
  p1;
end;

end.


// PROGRAM GŁÓWNY
uses u1,u2;

begin
  t1;t2;
  p1;p2;
end.

// to czy kompilator wyświetli zapetlenie jest tylko i wyłącznie kwestia tego, gdzie umieścisz słowo uses

0

// dzienx flaber uses po implementation i poszło :D no jak w mordke szczelił działa :D

<font color="green">dokładniej to w uproszczeniu mam na głównej formie TListView i jeszcze pare Akcji MainMEnu determinuje mi co ma być zrobione. I teraz np. jak wcisne sobie(na FullScreen) Spacje to powinien wziaść sobie nastepny Item i w zalezności od Opcji w MainMenu Wyświetlić cośtam na pełnym ekranie.
Nie można tego jakos zrobić za pomocą Application? znaleŹć forme główna i odpalić jej procedure? "Testuj" ,słabo mi idzie z tymi formami i applikacjami, bo zawsze mi cos wcina.</span>

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