Jak zmienić zdarzenie w czasie działania programu!

0

Witam!
Wiecie może jak w czasie działania programu zmienić zawartość zdarzenia danego komponentu, np. Button1 ( OnClick).
Pomóżcie, pilne !

0

Możesz w obsłudze zdarzenia OnClick wybierać zależnie od np. jakiejś zmiennej, co ma być wykonane.
Możesz także sam obsługiwać zdarzenia przejmując informacje z sytemu.

Nie wiem co dokładnie chcesz zrobić. :( --Jest jeszcze jeden błąd ... :)

--------------Blok reklamowy :) -----
kanał: #4programmers.net lub #4programmers
w sieci POLNet
serwer np.: warszawa.ircnet.pl

0

Zrób sobie zmiennne bool (czy tam boolean w Delphi:) ), w czasie wykonywania programu zmieniaj ich wartości, a podczas wykonywania zdarzenia wykorzystaje w if'ach:) (if (zmienna_bool1 == true) itd.).--trala la

0

Zenek napisał:
Zrób sobie zmiennne bool (czy tam boolean w Delphi:) ), w czasie wykonywania programu zmieniaj ich wartości, a podczas wykonywania zdarzenia wykorzystaje w if'ach:) (if (zmienna_bool1 == true) itd.).
&gt
To jak ma już być tak, to lepiej wykorzystać case (czy tam switch w C++ :) )--Jest jeszcze jeden błąd ... :)

--------------Blok reklamowy :) -----
kanał: #4programmers.net lub #4programmers
w sieci POLNet
serwer np.: warszawa.ircnet.pl

0

A jak zrobi cos takiego:
Form1.OnClick:=jakas procedura :-) To nie bedzie dzialac bo mi sie wydaje ze powinno--pozdrawiam PEDROS {hello}
PROPAGANDA: Uzywajcie irca i badzcie na kanale 4programmers.net
Delphi6

0

jesli chcesz mozesz zrobic to zmiennymi taj jak pisal poprzednik lub tak jak chciales:

private
procedure Klik1(Sender: TObject);
procedure Klik2(Sender: TObject);

...

procedure TForm1.Klik1(Sender: TObject);
begin
ShowMessage('PROCEDURA 1');
end;

procedure TForm1.Klik2(Sender: TObject);
begin
ShowMessage('PROCEDURA 2');
end;

i teraz mozesz sobie zmieniać

if costam = true then
Button1.OnClick := Klik1
else
Button1.OnClick := Klik2;

TADAM!

mam nadzieje ze to pomorze :)--[ Delphi... i wszystko jasne ]

0

Dzięki TheChoseN ale sam już do tego doSZEDŁem jak sie pierwsza osoba wypowiedziała (ale to nie dzięki niej) tylko mojej pomysłowości :-)
Dzięki wsyzstkim!

0

Torreto napisał:
sam już do tego doSZEDŁem ... tylko mojej pomysłowości :-)

Cóż za skromność :) Bardzo dobrze, że sam doszedłeś. W ten sposób więcej się zapamiętuje. {hello} --Jest jeszcze jeden błąd ... :)

--------------Blok reklamowy :) -----
kanał: #4programmers.net lub #4programmers
w sieci POLNet
serwer np.: warszawa.ircnet.pl

0

Masz racje Dryobates ze samemu jak sie robi to zawsze sie to rozumie w pewnym sensie i latwo zapamietuje :-)

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