Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Incompatible types: 'String' and 'Integer' [D7]


Страницы:   1 2

Vik ©   (2012-05-03 14:52:00) 

Приветствую, мне нужно, чтоб в поле Edit1 вводились только цифры (это я сделал), и при нажатии кнопки происходили действия.

Вот код. Подскажите, как правильно сделать?

procedure TForm1.Button1Click(Sender: TObject);
Var X : String;
begin
If X>5 then Label1.Visible:=True else Label2.Visible:=True;
end;


Юрий Зотов   (2012-05-03 15:27:00) [21]


> Vik ©   (03.05.12 14:52)  

procedure TForm1.Button1Click(Sender: TObject);
var
 X: integer;
begin
 X := StrToInt(Edit1.Text);
 Label1.Visible := X > 5;
 Label2.Visible := not Label1.Visible
end;


AV   (2012-05-03 15:24:00) [22]


> Vik ©   (03.05.12 15:08) [4]
>
> AV, как для текстового поля можно писать тип переменной
> "Integer" ?

никак.
но и текстовую переменную нельзя сравнивать с числом.
либо переменная типа число (любое), либо сравнивать не с числом
либо сравнивать не саму переменную, а результат функции от нее (см [5]).


Медвежонок Пятачок   (2012-05-03 15:22:00) [23]

Я читаю книгу, хочется поэкперементировать со своими примерами, вот и наткнулся на проблему.

Ты не ту книгу читаешь. Не про колобка надо читать книжку, а другую.


Плохиш   (2012-05-03 15:20:00) [24]


> procedure TForm1.Button1Click(Sender: TObject);
> Var X : String;
> begin
> If X>5 then Label1.Visible:=True else Label2.Visible:=True;
> end;
>

Оно кодит новый алгаритму для лотереи :-))


Медвежонок Пятачок   (2012-05-03 15:14:00) [25]

AV, как для текстового поля можно писать тип переменной "Integer" ?

Ну ты же не смущаешься, когда строку сравниваешь с числом.


Amoeba_   (2012-05-03 15:11:00) [26]


> Подскажите, как правильно сделать?

Есть такая магическая функция
function StrToInt(const S: string): Integer;


Vik   (2012-05-03 15:08:00) [27]

AV, как для текстового поля можно писать тип переменной "Integer" ?

Медвежонок Пятачок, я читаю. В книгах на такой вопрос ответ найти не получится (по крайней мере не получилось) :)

Сергей М., не совсем. Я читаю книгу, хочется поэкперементировать со своими примерами, вот и наткнулся на проблему.

Я завязываю с тыком, помогите только решить проблему. Спасибо.


Сергей М.   (2012-05-03 14:57:00) [28]


> почитать про основы программирования


Автор обещал это сделать в обозримом будущем
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1335956639&n=3

Ну а пока оно, обозримое будущее, не наступило, Автор изучает метод научного тыка)


AV   (2012-05-03 14:54:00) [29]

X : Integer;


Медвежонок Пятачок   (2012-05-03 14:54:00) [30]

правильно сделать - это почитать про основы программирования


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо