Вопрос № 63064: Здравствуйте уважаемые эксперты!
Подскажите в чем дело не могу разобраться, Создал, зарегистрировал базу данных в IBExpert, SQL сервер FireBird-2 и начал разработку приложения в Delphi. В таблице БД имеется столбец с типом FLOAT после ввод данных...Вопрос № 63074: Здравствуйте, Уважаемые эксперты!
Как найти факториал числа 2006?
(желательно с примером)...Вопрос № 63087: Здравствуйте.
Сразу скажу СПАСИБО (не помню кому) за предоставлённую ссылку на файл NetTraffMonitor.zip.
Я уже с помощью предоставленных процедур (ещё правда, не полностью разобрался как что работать там) сделал программку (или утилиту) ...Вопрос № 63088: Здравствуйте.
Это опять Я. Идеи просто валятся на голову. (Я быстро проги пишу)
Хочу сделать программу "Анаграммы" на Delphi. Хотя бы решить её "в лоб" (для проверки её работоспособности).
Для этого нужно, наверно...Вопрос № 63142: Здраствуйте! У меня такой вопрос: есть 2 формы в первой есть компоненты RadioGroup. Когда пытаюсь изменить свойтво ItemIndex из 2 формы то delphi ловит глюк и пишет следующие: [Pascal Error] Unit2.pas(1): Unable to invoke Code Completion due to error...Вопрос № 63147: Здраствуйте уважаемые эксперты. Вопрос такой: есть ли в Delphi встроенные функции шифрования например в php есть
md5(), я об этом. А как то фигово писать, if password='password' then ShowMessage('пароль верен'); так пароль можно узнать открыв прогу х...
Вопрос № 63.064
Здравствуйте уважаемые эксперты!
Подскажите в чем дело не могу разобраться, Создал, зарегистрировал базу данных в IBExpert, SQL сервер FireBird-2 и начал разработку приложения в Delphi. В таблице БД имеется столбец с типом FLOAT после ввод данных например 0,237 сохраняю их в БД, если необходимо их отредактировать отображается цифра 0,2370000034571 для DispleyFormat задал маску 0.000 и EditFormat 0.000 стало отображаться 0,237 но при просмотре данных в IBExpert оно равно 0,2370000034571
почему так, подскажите. Мне эти данные необходимы для расчета а такая цифра не устраивает.
Отвечает: sir henry
Здравствуйте, Жуков Сергей!
В таком случае при создании этого столбца Вам нужен не тип FLOAT, который является типом с плавающей точкой, а тип DECIMAL, который с фиксированой точкой и у которого Вы можете задать общее кол-во цифр и кол-во цифр после точки:
DECIMAL(10, 3)
Здесь общее кол-во цифр будет 10, цифр в дробной части - 3.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 18.11.2006, 06:24 Оценка за ответ: 5 Комментарий оценки: Спасибо большое!
Вопрос № 63.074
Здравствуйте, Уважаемые эксперты!
Как найти факториал числа 2006?
(желательно с примером)
Отправлен: 17.11.2006, 22:14
Вопрос задал: Solovej (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Coupler
Здравствуйте, Solovej!
Посмотрите вот эту статью:
http://delphiworld.narod.ru/base/factorial.html
Код в приложении.
Приложение:
Ответ отправил: Coupler (статус: Студент)
Ответ отправлен: 18.11.2006, 05:26
Отвечает: W@NDeReR
Здравствуйте, Solovej!
Можно сделать так
procedure TForm1.Button1Click(Sender: TObject);
var
i,x,y:integer;
begin
i:=0;
x:=0;
y:=0;
for i:=1 to 3 do
begin
X:=x+1;
y:=y+x;
end;
label1.Caption:=intTostr(y);
end;
Ответ отправил: W@NDeReR (статус: 1-ый класс)
Ответ отправлен: 18.11.2006, 12:42
Вопрос № 63.087
Здравствуйте.
Сразу скажу СПАСИБО (не помню кому) за предоставлённую ссылку на файл NetTraffMonitor.zip.
Я уже с помощью предоставленных процедур (ещё правда, не полностью разобрался как что работать там) сделал программку (или утилиту) для учёта траффика Интернет. Она подчитывает, пока что только по объёму приходящего траффика (у меня Интернет именно по объёму), но я ещё хочу сделать и по временному учёту и ещё она расчитывает сумму иcтраченных денег (за сеанс) в зависимости от введённого тарифа (сумма оплаты в месяц и объём траффика в месяц, по сооветсвующей формуле). Так как я не нашёл других подобных утилит
в Интернете, то решил написать свою. Давно хотел сделать нечто подобное. Другие утилиты меня не устраивали. И уже пользуюсь ею 2 дня. Классно!
А теперь собственно вопрос есть.
Хочу немного расширить (улучшить) программку.
1). Как, например, сделать дозвон по "Номер телефона" и с введением "Имя пользователя" и "Пароль"? Желательно, какой-нибудь пример на Delphi, я потом разберусь в ней.
2). Как запустить другую программу (или несколько программ) из неё, я наверно сам разберусь. Да мне и одной хватить запустить - я пользуюсь Opera 9.02 (и браузер и e-mail всё в 1 программе, удобно и быстро).
Пока усё.
Заранее всем...
Алекс
Отправлен: 18.11.2006, 00:15
Вопрос задал: AlexD (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Monah
Здравствуйте, AlexD!
Отвечу на половину.
2) uses ShellAPI
параметр, если нетунадо ставить nil
дерикторию, если программа сама не определяет, можно ставить nil.
Если имя программы указать URL откроется броузер по умолчанию с указаной страницей.
--------- festina lente
Ответ отправил: Monah (статус: Студент)
Ответ отправлен: 18.11.2006, 08:21
Вопрос № 63.088
Здравствуйте.
Это опять Я. Идеи просто валятся на голову. (Я быстро проги пишу)
Хочу сделать программу "Анаграммы" на Delphi. Хотя бы решить её "в лоб" (для проверки её работоспособности).
Для этого нужно, наверное, файл типа какого-нибудь слoварика? Можно обычный txt-файл подходящего объёма (100-300 кБ) со словами, разделённых пробелами или запятыми. Желательно чтобы слова не повторялись. Алгоритм я уже разработал (дорабатываю), ещё раз повторю - "решить в лоб" (простой перебор "слов" из txt-файла по-словам).
Пример записи искомого слова: 'ПР*ГРА**ИР*ВАТЬ'.
Допустим я её написал. Вопрос в следующем.
Можно ли как-то запустить её на КПК? Неожиданный вопрос, да? Глупый?
На днях хочу купить себе КПК (Acer n311, с VGA экраном + карта-памяти на 512 мБ). Люблю кроссворды разгадывать (хотя сам я мало знаний знаю). Поэтому эту программу на КПК мне бы было кстати иметь. Можно конечно, обойтись txt-файлом с поиском, но это не всегда уместно будет.
Может есть какие-то программы перекомпили... (короче, сделать компиляцию под комманды процессора КПК. Например, из Delphi в куда-то)?
Или эмулятор какой найти (эмулятор MS DOS у меня есть для КПК), но тут другая задача - это приложение под Windows.
Я искал в Интернете программу "Анаграммы" для КПК, но не нашёл. Точнее, есть только английская версия проги, с английскими буквами. А oна на фиг не надо.
Я думаю вопрос ясен.
P.S. Чёрт, не знаю за какую идею в первую очередь браться!! Всё интересно сделать.
Turbo Pascal forever...
Заранее всем...
Алекс
Отправлен: 18.11.2006, 00:17
Вопрос задал: AlexD (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 3)
Отвечает: sir henry
Здравствуйте, AlexD!
Вот здесь есть Паскаль для PalmOS:
http://www.ppcompiler.org/?lng=en
Бесплатный.
Есть еще разработка компании Pocket Technologies под названием PocketStudio. Сильно напоминает Delphi, но она платная.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 18.11.2006, 06:46
Вопрос № 63.142
Здраствуйте! У меня такой вопрос: есть 2 формы в первой есть компоненты RadioGroup. Когда пытаюсь изменить свойтво ItemIndex из 2 формы то delphi ловит глюк и пишет следующие: [Pascal Error] Unit2.pas(1): Unable to invoke Code Completion due to errors in source code. Что это такое и как с этим бороться - подскажите пожалуйста.
Отправлен: 18.11.2006, 14:47
Вопрос задал: Алескандр (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: sir henry
Здравствуйте, Алескандр!
Это значит, что ыо ыторой форме, откуда вы даете команду, надо сделать ссылку на первую форму:
Unit unit2;
Uses ..., unit1;
чтобы компилятор знал, к какому именно компоненту Вы обращаетесь.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 18.11.2006, 15:38
Отвечает: KiberZero
Здравствуйте, Алескандр!
Это ошибка завершения работы компонента в форме!
Видимо у вас неправильно присвоено значение RadioGroup или имеется недостающий оператор завершения программы(подпрограммы) end.
Просмотрите ещё раз внимательнее код. Трудно судить, хорошо бы видеть код...
Ответ отправил: KiberZero (статус: 1-ый класс)
Ответ отправлен: 19.11.2006, 00:10
Вопрос № 63.147
Здраствуйте уважаемые эксперты. Вопрос такой: есть ли в Delphi встроенные функции шифрования например в php есть md5(), я об этом. А как то фигово писать, if password='password' then ShowMessage('пароль верен'); так пароль можно узнать открыв прогу хоть обычным блокнотом, не говоря уже о мощных отлажчиках типа olly.
Отправлен: 18.11.2006, 15:26
Вопрос задал: Алескандр (статус: Посетитель)
Всего ответов: 3 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: sir henry
Здравствуйте, Алескандр!
Встроенных функций шифрования в Delphi нет и никогда не было. На Delphi можно написать свою функцию шифрования по любому алгоритму, как и в любом другом языке общего типа.
Модулей для шифрования для Delphi довольно много, поищите в инете, какой алгоритм шифрования Вам нужен и используйте его в своей программе.
Ответ отправил: sir henry (статус: Академик) Россия, Красноярск ---- Ответ отправлен: 18.11.2006, 16:08
Отвечает: Устинов Сергей Евгеньевич
Здравствуйте, Алескандр!
В прикрепленном файле модуль, осуществляющий md5 кодирование в Delphi.
В Uses подключаете модуль - и можна работать.
Использование:
LowerCase(MD5DigestToStr(MD5String('Привет'))) - даст аналог md5('Привет') из php.
Удачи!
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Ответы на все вопросы - на сайте www.ya.ru ☺
Отвечает: chikanok
Здравствуйте, Алескандр!
Так же вы можете использовать CryptoApi Встроеные в Windows библиотеки шифрования, хэширования и цифровых подписей. Модуль по работе с CryptoAPI 1-ой и 2-ой версии можно найти на http://www.delphi-jedi.org/. Примеры (на С++) на www.rsdn.ru (статья называется "Хеширование, шифрование и цифровая подпись с использованием CryptoAPI и .NET").
Удачи.
--------- Главное желание,а там разберёмся!
Ответ отправил: chikanok (статус: 3-ий класс)
Ответ отправлен: 19.11.2006, 10:24
