| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
что в этом коде не то [D7]
timerlan © (2005-08-04 19:02:00)что в этом коде не то?
procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.Text:='qqq'
then
begin
label1.Caption:='dobro pojalivat';
end
else
begin
showmessage ('bas bayira')
edit1.Text:='';
edit1.SetFocus;
end;
end.
Desdechado (2005-08-04 22:26:00) [1]showmessage ('bas bayira') ;
Verg (2005-08-04 19:25:00) [2]...и джинсы в рясу не заправляют, и в конце молитвы говорят "аминь", а не....
PVOzerski (2005-08-04 19:16:00) [3]Во-первых, в сравнении ставится не оператор присвоения ":=", а просто "=".
if edit1.Text='qqq'
Во-вторых, процедура, в отличие от модуля, заканчивается ";" , а не ".".
В третьих, "Добро пожал овать" транслитерируется как "dobro pojal ovat".
| |
