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




Вниз

ПОМОГИТЕ ПЛИЗЗ, СРОЧНО! 


ФДДДД   (2002-01-10 12:37) [0]

procedure TForm1.Button2Click(Sender: TObject);
begin
if edit2.Text:="Номер 1" and RadioButton1.Checked
then edit2.Text:="Номер 2" and edit1.Text:="Боль мешает при ходьбе ИЛИ чувствуется только в одной ноге??"
else edit2.Text:="номер 2" and edit1.Text:="Температура тела выше 38 градусов???";
end;

Вот процедура, в ней ошибка - [Error] Unit1.pas(64): Incompatible types: "String" and "Boolean"
Подскажите, чё не правильно плизз???



panov   (2002-01-10 12:42) [1]

Удалено модератором



Mbo   (2002-01-10 12:45) [2]

да уж - клюква такая была недавно в "Потрепаться"

if edit2.Text:="Номер 1" and RadioButton1.Checked then begin
edit2.Text:="Номер 2";
edit1.Text:="Боль мешает при ходьбе ИЛИ чувствуется только в одной ноге??";
end else begin
edit2.Text:="номер 2";
edit1.Text:="Температура тела выше 38 градусов???";
end;



Владислав   (2002-01-10 12:45) [3]

:= это оператор присваивания. Сравнение - это =



Mbo   (2002-01-10 12:47) [4]

ага, и у меня надо исправить в if-ах := на =




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




Наверх





Память: 0.72 MB
Время: 0.02 c
1-90266           Dreamer               2002-01-09 22:19  2002.01.28  
Нужно ниспадающее окошко с хелпом при зависании над каким-либо обьектом,


1-90312           tovSuhov              2002-01-11 13:43  2002.01.28  
Люди, помогите!!!


1-90263           Tosov                 2002-01-08 23:22  2002.01.28  
Закраска ячейки StringGrid


14-90351          fliz                  2001-11-28 17:36  2002.01.28  
кто по сколько часов в день программировать способен?


14-90364          Olgerd                2001-12-02 19:10  2002.01.28  
Мелочи. To Merlin.