Czy może mi ktoś poprawić procedure warunkową:
if button1.caption='Włącz' then begin
(wlacz) and (button1.caption:='Wyłącz')
end else
(wylacz($2fc,$2)) and (button1.caption:='Włącz');
Tak zeby działała ...
Za pomoc z góry dziękuje.
Czy może mi ktoś poprawić procedure warunkową:
if button1.caption='Włącz' then begin
(wlacz) and (button1.caption:='Wyłącz')
end else
(wylacz($2fc,$2)) and (button1.caption:='Włącz');
Tak zeby działała ...
Za pomoc z góry dziękuje.
Czy może mi ktoś poprawić procedure warunkową:
if button1.caption='Włącz' then begin
(wlacz) and (button1.caption:='Wyłącz')
end else
(wylacz($2fc,$2)) and (button1.caption:='Włącz');Tak zeby działała ...
Za pomoc z góry dziękuje.
if Button1.Caption='Włącz' then begin
(wlacz);//tu jest kod na wlaczenie
Button1.Caption:='Wyłącz';
end else begin
(wylacz($2fc,$2));//wylaczenie
Button1.Caption:='Włącz';
end;
end;
Azgon poczytaj jakiś kurs Pascala, bardzo dobry kurs znajdziesz na stronie pana o nicku Vogel ;)
L0f1X twój kod jest poprawny, ale Wlacz i Wylacz to chyba procedury z FAQ (zapalająca i gasząca LEDa podpiętego do portu COM), więc nawiasy są tutaj zbędne:
if Button1.Caption = 'Włącz' then
begin
Wlacz;
Button1.Caption := 'Wyłącz';
end
else
begin
Wylacz($2fc, $2);
Button1.Caption := 'Włącz';
end;
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.