вставка в функцию

← →
Nsk3D © (2006-03-08 17:59) [0]

Здрасте!Помогите вставить свойство (image1.visible:=true после Showmessage("Угадал!")) в функцию:
procedure TForm1.RadioButton3Click(Sender: TObject); begin if image1.Left=248 then showmessage("Угадал!") else showmessage("Пролетел!"); end;

← →
tesseract © (2006-03-08 18:08) [1]

Ой, ну копируй ....
procedure TForm1.RadioButton3Click(Sender: TObject); begin if image1.Left=248 then begin showmessage("Угадал!"); image1.visible:=true; end else begin showmessage("Пролетел!"); end; end;

ЗЫ : Вы что на пару с Der Nechk@ssoff лотерею пишите ?????

← →
Der Nechk@ssoff © (2006-03-08 18:22) [2]

Ну типа того...только не лотерею...

← →
EvS (2006-03-08 18:29) [3]

И дальше так собираетесь в стиле копипаст?

← →
tesseract © (2006-03-08 18:31) [4]

Профессионалы будущие :-) используют самый эффективный способ программирования :-)

← →
Nsk3D © (2006-03-08 18:33) [5]

Помогите исправить ошибки(в скобках):

procedure TForm1.RadioButton2Click(Sender: TObject); begin if image1.Left=148 then showmessage("Угадал!"); image1.visible:=true; end else(";" expected but "ELSE" found) begin showmessage("Пролетел!") end;("." expected but ";" found)

← →
tesseract © (2006-03-08 18:37) [6]

> if image1.Left=148 then
showmessage("Угадал!");

после then - begin вставь :-)

Ребята ну вы ..... ну хотя бы копируйте без ошибок...

← →
nsk3d © (2006-03-08 18:41) [7]

Копируем без ошибок!Они лезут при компиляции!

> ЗЫ : Вы что на пару с Der Nechk@ssoff лотерею пишите ?

Это один и тот же слепой ламер.

сравни [1] и [5]. У вас Ctrl-V или Сtrl-C наверно сбоят.

Вы мне сейчас весенний депрессняк устроите

вставка в функцию Найти похожие ветки