Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вниз

Моніпуляція чисел. Знайти схожі гілки


Socol   (2001-12-18 10:01) [0]

Здраствуйте!
Припустимо є label1.caption: = "450"
if label1.caption> "500" then boton1.enabled: = true
ще
boton1.enablad: = false;
if label1.caption> "1000" then boton1.enabled: = true
ще
boton1.enablad: = false;
У перші випадки все виходить а в другому немає.
тоесть Делфі щита що 450> 1000 тоесть вона порівнює з першої цифри як цього уникнути зробити так щоб вона стала порівнювати по всьому числу?



Виктор Щербаков   (2001-12-18 10:04) [1]

Порівнюй числа, а не їх рядкові уявлення.



Socol   (2001-12-18 10:06) [2]

це як?



gek   (2001-12-18 10:07) [3]

Або порівнюй їх tag_і



Виктор Щербаков   (2001-12-18 10:15) [4]

if StrToInt (Label1.Caption)> StrToInt (Label2.Caption) then ...



Voron   (2001-12-18 13:19) [5]

Bоton1.Enabled: = StrToInt (Label1.Caption)> 500;
Ось так. Тільки треба враховувати, що StrToInt викличе виключення якщо передана їй рядок містить щось крім цифр, ну ще мінус попереду може бути.



Андрей Сенченко   (2001-12-18 13:45) [6]

>> Voron ©

Якщо в Label1.Caption може міститися що завгодно (і на етапі розробки можна припустити що) - то для перетворення краще використовувати

StrToIntDef (St: string, Default: integer): LongInt



Voron   (2001-12-18 14:35) [7]

>> Андрій Сенченко ©

StrToIntDef в разі невдачі не викликає виключення, а повертає Default
Припустимо у нас щось на зразок

I: = StrToIntDef (St, -1);

їли St одно "-1" то функція в будь-якому випадку поверне -1, і тоді як дізнатися, що вона повернула Default або строкове представлення цілого з St?

StrToInt в разі невдачі генерує виняток, його можна обробити.
З повагою Voron



сторінки: 1 вся гілка

Форум: "Основна";
Поточний архів: 2002.01.08;
Завантажити: [xml.tar.bz2];

Вгору





Пам'ять: 0.56 MB
Час: 0.026 c
3-21998
Yu
2001-12-07 11:27
2002.01.08
Видалення запису з Query


1-22173
Petyun
2001-12-20 19:33
2002.01.08
установка компонент


14-22345
petr_v_a
2001-11-05 20:13
2002.01.08
На захист Лани Розанової & Co !!!


1-22103
ProfiUgl
2001-12-19 17:15
2002.01.08
подія форми


1-22131
Катя
2001-12-20 08:27
2002.01.08
мені дуже потрібно





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська