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

Вниз

Удаление   Найти похожие ветки 

 
Оксана Вл.   (2008-07-29 15:43) [0]

Скажите пожалуйста как мне удалить числа находящиеся после запятой


var Str1, Str2: String; P: Integer;
begin
Str1:="192565,53";
Str2:=",";
P:=Pos(Str2, Str1);
delete(str1,p,1);
showmessage(str1);


 
jack128_   (2008-07-29 15:46) [1]


> delete(str1,p,1);

Почему один?  Сюда нуно передовать сколько символов ты хочешь удалить..


 
Johnmen ©   (2008-07-29 15:46) [2]


> как мне удалить числа находящиеся после запятой

Зачем?


 
Оксана Вл.   (2008-07-29 15:50) [3]

Johnmen © Ну мне просто надо выводить сумму прописью, а функцию я нашла только которая считает тип интеджер, так вот приходится избавлятся от запятой и двух последних цифр


 
oldman ©   (2008-07-29 15:51) [4]


> Str2:=",";
> P:=Pos(Str2, Str1);
> delete(str1,p,1);


Можно заменить на

delete(str1,pos(",",str1),1)

Две переменные не нужны...


 
oldman ©   (2008-07-29 15:52) [5]


> а функцию я нашла только которая считает тип интеджер



> var Str1: String;
> Str1:="192565,53";


ну-ну...


 
Johnmen ©   (2008-07-29 15:53) [6]


> Оксана Вл.   (29.07.08 15:50) [3]

Это называется реальная проктология :)
Учите язык в конце концов.


 
Григорьев Антон ©   (2008-07-29 15:54) [7]


> Оксана Вл.   (29.07.08 15:50) [3]

Ну тогда вот: http://www.delphikingdom.com/asp/viewitem.asp?catalogid=1028


 
stas ©   (2008-07-29 15:57) [8]

var f:Real; S:String;
begin
f:=25.56;
S:=IntToStr(Round(f));
showmessage(S);
end;


 
Оксана Вл.   (2008-07-29 16:15) [9]

Скажите а почему при установке компонента у меня высвечивается такая ошибка

Undeclared identifier: "MainFormHandle"


 
MsGuns ©   (2008-07-29 16:18) [10]

Ну зачем для такой простой задачки нужен компонет, а ?

Дайте мыло - я Вам отправлю код функции вечером


 
Оксана Вл.   (2008-07-29 16:22) [11]

Спасибо!... но не поможете мне с установкой компонента точнее с ошибкой которую он показывает


 
stas ©   (2008-07-29 16:38) [12]

Вам нужно указать путь к папке в которой лежит этот компонент, в Tools


 
Оксана Вл.   (2008-07-29 16:41) [13]

Разобралась Спасибо!


 
Игорь Шевченко ©   (2008-07-29 16:56) [14]

Ты когда-нибудь прочитаешь правила форума в части темы вопросов ?



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

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

Наверх





Память: 0.47 MB
Время: 0.005 c
2-1217423289
yyty
2008-07-30 17:08
2008.09.07
мигание при изменении размера


3-1205319290
rebroff
2008-03-12 13:54
2008.09.07
Повторяющиеся значения поля


15-1216034230
oldman
2008-07-14 15:17
2008.09.07
Как в ХР увидеть содержимое корневого каталога С?


2-1217408913
денис_м
2008-07-30 13:08
2008.09.07
Настройки в программе


2-1217313439
Ilg
2008-07-29 10:37
2008.09.07
Удаление папки, содержащей БД





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский