Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.08.30;
Скачать: [xml.tar.bz2];

Вниз

Сравнить значение Мемо с заданым   Найти похожие ветки 

 
Guest___ ©   (2009-06-28 16:37) [0]

Как сделать чтобы при нажатии кнопки сравнивалось значение из мемо с заданым. К примеру задано чило 17. Если в мемо 17  или больше то выполня дальше если нет то выход?


 
Юрий Зотов ©   (2009-06-28 17:07) [1]

F1: Memo.Text и StrToInt


 
Guest___ ©   (2009-06-28 17:10) [2]


> Юрий Зотов ©   (28.06.09 17:07) [1]
> F1: Memo.Text и StrToInt


А можно пример кнопки от бегин до енд? Примерно.
Это пишеться в мемо
var
 lt: TSYSTEMTIME;
 st: TSYSTEMTIME;
begin
 GetLocalTime(lt);
 Memo1.Lines.Add("" +
   IntToStr(lt.wHour));
end;


 
Loginov Dmitry ©   (2009-06-28 23:45) [3]


> А можно пример кнопки от бегин до енд? Примерно.


Юрий дал все необходимое. Что здесь может быть непонятным?
Вас нужно учить, что есть оператор сравнения ">=", что есть оператор условного перехода "if ... then"? Для этого учебники нужно читать соответствующие. Форум не научит.



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

Форум: "Начинающим";
Текущий архив: 2009.08.30;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
15-1246195055
Юрий
2009-06-28 17:17
2009.08.30
С днем рождения ! 28 июня 2009 воскресенье


15-1246464115
Pashka.cool
2009-07-01 20:01
2009.08.30
Проблема с режимом отладки в самой среде!!!!!!


15-1246310150
Cerberus
2009-06-30 01:15
2009.08.30
Вопрос про OEM лицензию WIN.


15-1246131261
DillerXX
2009-06-27 23:34
2009.08.30
Вопрос по терверу


4-1213186653
A.L.E.X.A.N.D.E.R.
2008-06-11 16:17
2009.08.30
Отлов обращений апи-функций к процессу





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский