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

← →
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]

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

showmessage ("bas bayira");

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