Показать первые 25 сообщений в этой теме |
StarCraft FOREVER (http://starcraft.7x.ru/forum//index.php)
- Технический форум (http://starcraft.7x.ru/forum//forumdisplay.php?forumid=12)
-- Вопрос по Delphi. (http://starcraft.7x.ru/forum//showthread.php?threadid=10109)
Вопрос по Delphi.
Элементарный вопросик.. на который уже три дня не могу найти ответа: как сделать, чтобы в строке ввода можно было писать числа, которые будут восприниматься программой именно как числа, а не как строка символов? Попытка объявить их как integer или real заканчивается конфликтом с Edit.Text, которой нужет string.
А нету функции типа val(s), где s string?
__________________
Кто прочел мою подпись, тот дурак.
Вообще-то жизнь прекрасна, если правильно подобрать антидепрессанты....
Хы! Допёр! Почему-то всегда, как только озвучиваю вопрос на форуме, сразу нахожу ответ. =) Вот программа из строки и кнопки, которая производит вычисление квадрата введенного числа.
code:
procedure TForm1.Button1Click(Sender: TObject); var x:Extended; begin x:=StrToFloat(Edit1.Text); x:=x*x; ShowMessage(FloatToStr(x)); end;
Val это функция Visual Basic'a. Попробуй еще вариант объявления универсальной переменной (в ВБ - тип VARIANT).
__________________
quote:
Исходное сообщение от Dok†o®
не могу ничем помочь ибо в делфи не разбираюсь.
Еще один сверхдурацкий вопрос: как в структуре if задать несколько условий? Например, мне нужно, чтобы действие совершалось в определенных значениях переменной. На php я бы написал это так:
code:
<? if($x>5 && $x<10){ echo('x больше 5, но меньше 10'); }else{ echo('x не принадлежит интервалу (5;10)'); } ?>
if (x>5) and (x<10) then ... else ...
http://itby.ru/content/category/2/28/40/
Может быть, здесь что-то найдется.
__________________
И, думаю, последнее. Как перенести текст в Memo.Text на следующую строку? И как сделать это в окне ShowMessage?
Несколько способов в VB:
1) есть переменная vbNewLine (переход на новую строку);
2) есть переменная vbCr (переход на новую строку);
3) есть переменная vbCrLf (переход на новую строку);
4) 10 символ в таблице ASCII означает переход на новую строку, т.е. можно его перевести таким образом: в VB - Chr(10) - это строковое
__________________
case решает при множественном выборе ^^
case k of
<список значений 1>: <оператор 1>;
...
<список значений n>: <оператор n>;
else
<оператор>
end;
Насчёт переноса строки - с этим не сталкивался и не интересовался. Думаю, 10-й символ должен сработать
__________________
No Spam plz!
Что касается технического переноса операторов (например, цепочка сравнений слишком длинна, и надо ее на разные строки) в VB - символ "_", как же в Дельфи - не знаю
__________________
Не работает chr(10) и #10 не работает. Квадратик рисуется и всё.
Значит, считает неопрделенным символом. Не, знаю, но в текстовых полях у меня это работало. Но в всплывающих подсказках - у мня был колышек... =(
__________________
Хех.. Сидел вчера почти до трёх ночи, искал в нете и в книжке. А затем в делфи выделил символ #, нажал F1 и выскочило:
'Line1'#13#10'Line2';
Вот так ^^
Как, видишь, все таки #10 А вообще, лучше поискать, конечно, в учебниках. Я вот только ВБ, ХТМЛ, да ДжавуСкрипт чуток знаю.
А, кстати, нет случаем средства переноса в всплывающих подсказках? А то ой ужас как замучился...
__________________
Часовой пояс: GMT. Текущее время: 11:24. | Показать первые 25 сообщений в этой теме |
Powered by: vBulletin Version 7.7.7
Copyright © Jelsoft Enterprises Limited 2000 - 2024.
Русский перевод ©2003 - 2024, Voyager