Форум: "Основная";
Текущий архив: 2005.08.28;
Скачать: [xml.tar.bz2];

Вниз

что в этом коде не то   Найти похожие ветки 

← →
timerlan   (2005-08-04 19:02) [0]

что в этом коде не то?

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.

---

← →
PVOzerski ©   (2005-08-04 19:16) [1]

Во-первых, в сравнении ставится не оператор присвоения ":=", а просто "=".
if edit1.Text="qqq"

Во-вторых, процедура, в отличие от модуля, заканчивается ";" , а не ".".

В третьих, "Добро пожаловать" транслитерируется как "dobro pojalovat".

---

← →
Verg ©   (2005-08-04 19:25) [2]

...и джинсы в рясу не заправляют, и в конце молитвы говорят "аминь", а не....

---

← →
Desdechado ©   (2005-08-04 22:26) [3]

showmessage ("bas bayira");

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2005.08.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.036 c