![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
вставка в функцию [D7, XP]
Nsk3D © (2006-03-08 17:59:00)Здрасте!Помогите вставить свойство (image1.visible:=true после Showmessage('Угадал!')) в функцию:
procedure TForm1.RadioButton3Click(Sender: TObject);
begin
if image1.Left=248 then
showmessage('Угадал!')
else
showmessage('Пролетел!');
end;
Virgo_Style (2006-03-08 21:06:00) [1]Вы мне сейчас весенний депрессняк устроите
tesseract (2006-03-08 18:44:00) [2]сравни [1] и [5]. У вас Ctrl-V или Сtrl-C наверно сбоят.
Плохиш (2006-03-08 18:43:00) [3]
> ЗЫ : Вы что на пару с Der Nechk@ssoff лотерею пишите ?
Это один и тот же слепой ламер.
nsk3d (2006-03-08 18:41:00) [4]Копируем без ошибок!Они лезут при компиляции!
tesseract (2006-03-08 18:37:00) [5]
> if image1.Left=148 then
showmessage('Угадал!');
после then - begin вставь :-)
Ребята ну вы ..... ну хотя бы копируйте без ошибок...
Nsk3D (2006-03-08 18:33:00) [6]Помогите исправить ошибки(в скобках):
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:31:00) [7]Профессионалы будущие :-) используют самый эффективный способ программирования :-)
EvS (2006-03-08 18:29:00) [8]И дальше так собираетесь в стиле копипаст?
Der Nechk@ssoff (2006-03-08 18:22:00) [9]Ну типа того...только не лотерею...
tesseract (2006-03-08 18:08:00) [10]Ой, ну копируй ....
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 лотерею пишите ?????