Отправляет email-рассылки с помощью сервиса Sendsay

Программирование. Форум !!!

Подписаться Бесплатный дискуссионный лист Подписчиков 308
←   Май 2004   →
 1
 2
 3
 4
04.05.2004
13:50:29
19:05:00
 5
 6
 7
 8
 9
10
11
11.05.2004
03:45:55
20:11:33
12
13
14
15
16
17
18
19
19.05.2004
06:23:09
22:02:26
20
21
21.05.2004
10:37:37
20:32:15
22
23
24
24.05.2004
12:46:15
22:01:04
25
26
27
28
29
30
31


За последние 60 дней ни разу не выходила


Сайт листа: http://codeguru.ru
Открыт: 21-09-2003
Пре-модерация: Нет
Адрес для писем в лист: comp.soft.prog.prog-list@subscribe.ru
Адрес модератора: comp.soft.prog.prog-owner@subscribe.ru

Модератор
3V

Статистика

308 подписчиков
0 за неделю

За 2004-05-05

Re: [Delphi6]integer or not integer?

Hello, keel.

k> Как узнать что в edit1.text - числа(integer) или текст(string)?

Ну нафлудил...
Так вот,

Fuction IsInteger: Boolean;
Var
I: Integer;
Begin
Try
I := IntToStr(Edit1.Text);
Result := True;
Except
Result := False;
End;
End;

Есть и более красивые решения, но это ИМХО, самое простое в
реализации. Вообще я бы переписал функцию IntToStr(), если не было бы
лень :)

<<-------------------------------------------------------------->>
Подсунь свою мечту врагам - они погибнут при ее реализации

   "B." 2004-05-05 23:46:56 (#139484)

Re: [Delphi6]integer or not integer?

в edit1.text всегда текст...:)

i:=StrToIntDef(edit1.text,-1);
if i=-1 then showmessage('error');

On Wed, 5 May 2004 14:27:54 +0300
keel <dima***@s*****.by> wrote:
>Здравствуйте!
>Как узнать что в edit1.text - числа(integer) или текст(string)?
>
>
>
>--
>Пока!
>С уважением, keel [Windows XP|TheBat! 2.10]
>5 мая 2004 г. 14:27
>>Номер выпуска : 2990
>Возраст листа : 226 (дней)
>Количество подписчиков : 395
>>Адрес в архиве :
>http://subscribe.ru/archive/comp.soft.prog.prog/msg/139294
>>Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
>Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
>Формат "каждое письмо" :
>mailto:comp.soft.prog.prog-normal@subscribe.ru
>Формат "читать с веба" :
>mailto:comp.soft.prog.prog-webonly@subscribe.ru
>
>
>
Номер выпуска : 2992
Возраст листа : 226 (дней)
Количество подписчиков : 395
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/139476
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru

http://subscribe.ru/ mailto:ask@subscribe.ru

  
hohmaso***@r*****.ru
2004-05-05 23:44:32 (#139476)

Re: [Delphi6]progressbar на statusbar

Здравствуйте keel,

Wednesday, May 5, 2004, 1:41:41 PM, вы писали:

Сорри, письмо ушло без моего ведома.
Проблема уже решена.

  
keel
2004-05-05 15:29:02 (#139295)

[Delphi6]integer or not integer?

Здравствуйте!
Как узнать что в edit1.text - числа(integer) или текст(string)?

  
keel
2004-05-05 15:28:26 (#139294)

[Delphi6]progressbar на statusbar

Здравствуйте!

  
keel
2004-05-05 14:56:18 (#139265)

[Delphi6]threads->>clientsocket

Здравствуйте!
Объясните пожалуйста для чего нужен сабж и как им пользоваться?

  
keel
2004-05-05 12:44:37 (#139197)

[Delphi6]clientsocket

Здравствуйте!
Нужно с разных сокетов подконнетиться к разным серверам, но есть одна
проблема - у этих серверов один и тот же порт для подкоючения. Как
осуществить такое?

  
keel
2004-05-05 12:44:04 (#139195)