Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.28;
Скачать: CL | DM;

Вниз

ПОМОГИТЕ ПЛИЗЗ, СРОЧНО!   Найти похожие ветки 

 
ФДДДД   (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-ах := на =



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

Текущий архив: 2002.01.28;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
3-90189
AlexeyV
2001-12-21 01:51
2002.01.28
Events on ADO & MSSQL 2000


1-90311
NLO
2002-01-11 07:16
2002.01.28
TListBox


4-90406
vov1
2001-11-24 10:59
2002.01.28
ToolBar


1-90307
dmitry_s
2002-01-11 11:52
2002.01.28
Delphi5 & MSSQL uniqueidentifier


14-90374
asafr
2001-12-04 18:28
2002.01.28
Появился lel и всё оживилось... О женщинах опять заговорили...