Re: требуются идеи :)

Привет!

Олег Пономарев:
> На экран выводится карта города. Из базы данных берутся адреса
> торговых точек и по этим адресам делаются пометки на карте. Карта при
> этом должна уметь менять масштаб.
> . . .
> а вот как выводить точки на карту,
> что бы они попадали на нужные улицы и дома, просто представить не могу :(.
>

1. Ввести в программе режим настройки. В этом режиме вывести на экран карту
и список торговых точек. Предложить пользователю для каждой торговой точки
из списка показать соответствующую точку в окне с картой. Экранные
координаты мыши при нажатии кнопки пересчитать в координаты карты (BitMap)
единичного масштаба и занести их в базу.

2. В обычном режиме (не в режиме настройки) сформировать в памяти BitMap
карты единичного масштаба и нанести на него точки, соответствующие
координатам, извелечённым из базы. Вывести на экран нужный фрагмент в
требуемом масштабе (функция GDI StretchBlt).

Андрей

Номер выпуска : 4775
Возраст листа : 664 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/402691
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-07-18 11:48:52 (#402691)

Delphi + AVI

Добрый день.

Подскажите плиз, существуют ли библиотеки для Delphi, для создания
AVI файлов из набора картинок. Возможно есть Windows Media SDK для
Delphi?
Если кто знает, как на делфи любым путем можно создать AVI
поделитесь плиз.

     ответов: 3   2005-07-17 14:45:38 (#401507)

Кэш иконок

Привет comp,

Как програмным способом обновить кэш иконок?

Афоризм напоследок: Слабость - это сила, действующая в противоположном направлении
Winamp глаголит: Scooter - Stuttgart
1 июля 2005 г. 22:52:48

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4719
Возраст листа : 652 (дней)
Количество подписчиков : 516
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/395524
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 5   2005-07-16 23:11:14 (#395524)

smtp

Здравствуйте, Почтовый форум по программированию,

Может у кого есть описание и примеры работы с SMTP протоколом.
Без аутенфикации в инете куча примеров, словно все сдирают у друг
друга - очень похожие.. Но сейчас все майл-сервера просят пароль.. (
Мож у кого есть примеры доки..

--
От
Serger пишите сюда:serg***@u*****.ru

Friday, July 15, 2005, 7:17:37 AM

Номер выпуска : 4763
Возраст листа : 663 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/402091
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-07-16 21:04:14 (#402091)

Клиент-Клиенту

Нужно написать пиринговый клиент. Есть идеи?

--
^//\\
-\\//
|//\\
*\\//

Номер выпуска : 4768
Возраст листа : 663 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/402204
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-07-15 22:29:50 (#402204)

peer-to-peer

Можно ли средствами Delphi закачать файл из сетей eDonkey2000?

Номер выпуска : 4762
Возраст листа : 663 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/402027
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-07-15 16:31:17 (#402027)

webbrowser

Здравствуйте програмеры!

Как получить содержимое страницы из WebBrowser в виде TString ? Или
файла html?

     ответов: 1   2005-07-15 01:02:53 (#398332)

Asm под Win

Здравствуйте, All.

Подскажите, на чем сейчас лучше всего заниматься программингом на
ассемблере под Windows (раньше пользовал tasm). Где это скатать можно?
Какие ресурсы в сети посоветуете посетить?

   fmad   ответов: 2   2005-07-14 07:19:34 (#400771)

Создание собственного отчета.

Здравствуйте все,

Проблема такая. Есть данные, есть среда АвтоКАД, в которой эти
данные нужно разместить. Сейчас это делается убого. Т.е. создаются
определенные инструменты для размещения данных в нужных местах. И
специальные программы по размещению.
Хотелось-бы разобраться в вопросе создания отчетов, что-бы
реализовать более гибкую и быстродействующую среду описания вида
отчета и заполнения отчета данными.
Подскажите где рыть...

     ответов: 0   2005-07-13 14:40:03 (#400609)

Шрифты

Привет народ!

Работаю в Делфи 7. Как можно получить для какого-то конкретного шрифта все
поддерживаемые им наборы символов?

     ответов: 1   2005-07-13 08:47:58 (#400300)

Конвертация из UTF7 в ANSI и обратно

Привет Всем.

Возник такой вопрос. Как конвертить данные из UTF-7 в ANSI и
обратно. Пишу на Delphi.
Как таковой спецификации на него нет, только на UTF-8. Если кто сталкивался
с таким может
подкинете идею как преобразовать данную кодировку



С уважением, Padre Mortius

Номер выпуска : 4743
Возраст листа : 657 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/398156
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-07-11 07:29:00 (#398156)

сеть

ВрЕМеЧк0 д0бРеНьк0е, Delphi,

такая возникла задача:
поставить счётчик на папку (netbios/ftp), и чтобы по запросу
выдавала статистику: сколько за день заходило и кто, сколько раз
заходил определённый юзер за день/неделю.
Я так понял надо работать с netbios, как??
статистику можно через БД+SQL-запросы???

     ответов: 1   2005-07-11 01:02:54 (#397278)

Delphi железо

Здравствуйте програмеры!

Как узнать температуру HDD и проца?

     ответов: 1   2005-07-11 01:02:42 (#398327)

Как получить IP address своего компьютера?

Здравствуйте, comp.

Как получить IP address своего компьютера?

   Виктор   ответов: 1   2005-07-09 00:08:18 (#398076)

Хотите продвинуть свои программы?

Здравствуйте, господа программисты.
Я уверен, что у вас есть интересные и востребованные программы,
которые вы хотели бы продавать, но не имеете возможности этого
сделать. Если вас интересует коммерческое распространение ваших
программ, то напишите мне на личку и мы обсудим этот вопрос.

     ответов: 6   2005-07-09 00:07:36 (#397094)

вопрос про библиотеки Visual C++

Здравствуйте, comp.

Хочу спросить ту часть сообщества, которая использует Visual C++:
кто какими библиотеками GUI пользуется и какая по вашему мнению лучшая, я имею
в виду такие
Dundas Ultimate Toolbox
Codejock
BCG
очень хочется услышать мнение людей использующих эти инструменты.

Всего доброго,
Абрамовский Иван,
www.BrothersTools.com
info@b*****.com

Номер выпуска : 4690
Возраст листа : 638 (дней)
Количество подписчиков : 531
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/388023
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Brothers Tools   ответов: 11   2005-07-07 21:44:58 (#388023)

SQL преобразование типов

Привет программисты,

Как сформировать строку в SQL-запросе: hxb, где h и b - числа?
Например: 100х120

SELECT
...
h, b, //а надо hxb
...
FROM ...

Используемая СУБД MS Access

Операции типа
h||"x"||b - ругаются на знак ||
h+"x"+b - возвращает ошибку
да и не должны здесь работать

Афоризм напоследок: Ничто так не ограничивает мировоззрение как размеры зарплаты.
Winamp глаголит: Iron Maiden - Aces High
1 июля 2005 г. 22:39:10

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4720
Возраст листа : 652 (дней)
Количество подписчиков : 516
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/395525
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-07-05 00:55:20 (#395525)

IPX/SPX

Привет comp,

Есть ли в протоколе NWLink(IPX/SPX) команда - аналог команды ping в
протоколе TCP/IP

Афоризм напоследок: Наивность - это редкий дар смотреть на мир невооруженным
взглядом.
Winamp глаголит: Scooter - Stuttgart
1 июля 2005 г. 22:53:44

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4721
Возраст листа : 652 (дней)
Количество подписчиков : 516
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/395526
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-07-04 09:42:02 (#395526)

Фишка.

>, comp

В Delphi 7 есть пара известных мне фишек:

Откройте окно About > зажмите клавишу ALT и наберите слова TEAM или
DEVELOPERS или JEDI = увидите список создателей.

P.S. Я использую Delphi 7

     ответов: 0   2005-07-03 17:07:40 (#395302)

Градиентный контрол + кнопка-DropDown

>, comp

Каким одним компонентом можно сделать панель кнопок как в Windows Explorer,
Internet Explorer, Mozilla Firefox? т.е. та панель на которой расположены
кнопки-иконки (с DropDown).

Нужно чтобы была такая же панель с таким же 'оттенком' и чтобы при
наведении курсора 'мыши' иконка подсвечивалась и немного становилась
цветней.

С использованием стандартный компонентов из пакеты Delphi7 "ToolBar" и
"CoolBar" добиться нужно результата мне не удалось.

P.S. Я использую Delphi 7

     ответов: 3   2005-07-02 20:38:34 (#390419)

Manifest Windows'a XP

>, comp

Как узнать (в виде кода) в каком режиме работает моя программа в Windows XP -
в
XP'ишном или Классическом отображение?

P.S. Я использую Delphi 7

     ответов: 1   2005-06-30 15:06:00 (#393370)

CListCtrl

Здравствуйте, comp.

Кто нибудь, помогите присоеденить изображение в CListCtrl. Если есть
пример кода, буду благодарен.

   Виктор   ответов: 3   2005-06-29 20:51:26 (#392500)

find and find_if

Подскажите пожалуйста кто работас с ф-ями find и find_if как
сделать правильный предикат... для вектора Vect
std::vector<std::pair<int,CString> > Vect

int i=1000;

std::vector<std::pair<int,CString> >::const_iterator it;
it = std::find_if(Vect.begin(),Vect.end(),greater);

как найти итератор it такой, что it->first == i ????

и как должна тогда выглядеть ф-я greater???

Номер выпуска : 4708
Возраст листа : 647 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/393084
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-06-29 20:46:33 (#393084)

Каскадные изменения в Oracle

Почему при создании констраинта поддерживается опция on delete cascade, но не
поддерживается аналогичная on update.

// эта конструкция работает
ALTER TABLE SlaveTable ADD Constraint ST_FK
FOREIGN KEY (AnyKeyField) References MasterTable (AnyKeyField)
ON DELETE Cascade;

// Облом
ALTER TABLE SlaveTable ADD Constraint ST_FK
FOREIGN KEY (AnyKeyField) References MasterTable (AnyKeyField)
ON UPDATE Cascade;

Вроде оба варианта включены в SQL92.

Если 2 конструкция не работает, то можно ли сэмулировать ее в триггерах.
Заранее благодарен.

Номер выпуска : 4705
Возраст листа : 647 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/392656
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Олег Воеводский   ответов: 0   2005-06-29 04:42:14 (#392656)

Вопрос

Здравствуйте, comp.

Будьте добры! Подскажите такой вопрос. Когда В MFC включаеш разрешение
ввода инструментальных подсказок, можно ли в них вставить свой текст?
Если да, то каким образом.

   Виктор   ответов: 7   2005-06-29 00:49:51 (#384138)

OpenGl и ASE модели.

--
Вот недавно начал с 3d заниматься, и вот столкнулся сразу с множеством
проблем...
1. Импорт моделей. Какой формат лучше использовать для этих целей?
2. В данный момент я пытаюсь использовать ASE, но никак не могу
найти-написать нормальную читалку. ВСё что мне попадалось или не могло,
например, накладывать текстуры, или вообще работала с ошибками и прочими
глюками.
Может кто-нибудь знает где можно достать рабочий модуль для чтения ase или
иных типов 3d моделий?

Номер выпуска : 4691
Возраст листа : 638 (дней)
Количество подписчиков : 531
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/388195
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-06-25 14:54:25 (#388195)

Градиентный контрол + кнопка-DropDown

>, comp

Каким одним компонентом можно сделать панель кнопок как в Windows Explorer,
Internet Explorer, Mozilla Firefox? т.е. та панель на которой расположены
кнопки-иконки (с DropDown).

Нужно чтобы была такая же панель с таким же 'оттенком' и чтобы при
наведении курсора 'мыши' иконка подсвечивалась и немного становилась
цветней.

С использованием стандартный компонентов из пакеты Delphi7 "ToolBar" и
"CoolBar" добиться нужно результата мне не удалось.

P.S. Я использую Delphi 7

     ответов: 0   2005-06-24 19:52:44 (#390427)

стандартный ввод

Как направить текст на стандартный ввод другой программы из Delphi? Без использования
файлов

Номер выпуска : 4695
Возраст листа : 639 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/388766
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Олег Воеводский   ответов: 1   2005-06-21 20:37:35 (#388766)

Розыскивается компонент Toolbars2000

Здравствуйте.

Очень нужен компонент(ы) Toolbars2000.
Своего инета не имею. Есть только почта.
Если у кого имеется такой компонент, киньте мне на личку,
пожалуйста. Или дайте прямую ссылка на его скачивания.
Заранее благодарю.

   Feniks   ответов: 0   2005-06-21 12:13:17 (#388479)

Visual C++ v6

Здравствуйте, ALL.
Я совсем недавно начал программировать на С++, так что мой вопрос скорее
всего глуп, но всё же...
При попытки компиляции программы выдаёт такую вот ошибку:
C:\Program Files\3D Exploration\Valley.cpp(11312) : fatal error C1076:
compiler limit : internal heap limit reached; use /Zm to specify a higher
limit.
Я так понимаю, что проблема в том что в cpp'шники содержится массив очень
большого размера, и для него элементарно не хватает памяти...
Как заставить его компилироваться?
Номер выпуска : 4692
Возраст листа : 638 (дней)
Количество подписчиков : 531
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/388196
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-06-21 08:16:57 (#388196)

dbExpress в Delphi

Hi people!

Использую компонент TSQLQuery из закладки dbExpress. Проблема при использовании
в SQL запросе параметров - он почему-то все подстановки заключает в одинарные
кавычки. Например, использую запрос
SELECT *
FROM albums
LIMIT :start, 30

мне нужно чтобы подставленное значение было без кавычек, иначе происходит синтаксическая
ошибка при выполнении запроса. Использование типа integer вместо string'а результатов
не дает

     ответов: 4   2005-06-20 02:38:20 (#386195)

Копонент не устанавливается >:-[

>, comp

Не в какую не могу установить компоненты предназначенные для Delphi 6
и ниже !!!! >:-[

Это касается именно тех компонентов которые идут сразу в
скомпилированном виде (DCU).

Вот имя одного из компонента предназначенного для Delphi6 который у
меня не устанавливается: TDBAdvListView v1.54.

При установке Delphi7 требует (*).pas
а pas'а нету - ведь shareware компонент, а они идут уже в dcu.

ПОМОГИТЕ - SOS - ПОМОГИТЕ - SOS!!!

P.S. Я использую Delphi 7

     ответов: 1   2005-06-19 21:32:31 (#387430)

Вопрос

Здравствуйте, Victor.

Я переустановил Visual C++ 6.0, и непонятные ситуации с контекстными
справками и ещё некоторые исчезли. Спасибо за участие.

   Виктор   ответов: 2   2005-06-19 20:12:26 (#387434)

Какой Компонент?

>, comp

Нужен компонент для отображение HTML'а в готом 'дизайнерском' варианте,
то есть что-то типа веб-браузера, Outlook Express'а.

Только не предлагайте TWebBrowser - мне не нужны дыры IE.

P.S. Я использую Delphi 7

     ответов: 1   2005-06-19 01:53:21 (#387184)

Количество записей

Hi people!

Использую в Delphi 7 компоненты dbExpress для связи с БД MySQL. Результатом
выполнения запроса оказывается однонаправленный набор данных. Вопрос: можно ли
получить из компонента количество записей, возращенных в результате выполнения
запроса без использования в запросе функции COUNT()? Либо можно ли поместить
эту функцию в запрос так, чтобы отдельным полем возвращалось количесво всех записей
в результирующем запросе?

     ответов: 1   2005-06-18 23:53:47 (#387113)

работа Delphi

Добрый день!
Скажите, как студентке найти в Донецке работу программиста на Delphi или Visual
C++? Может у кого-то есть вакансия? Или предложение об удаленной работе(но именно
по программированию)?

Номер выпуска : 4674
Возраст листа : 635 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/386845
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-06-17 23:42:58 (#386845)

Re: dbExpress в Delphi

Приветствую, Lucky!

>Использую компонент TSQLQuery из закладки dbExpress. Проблема при использовании
>в SQL запросе параметров - он почему-то все подстановки заключает в одинарные
>кавычки. Например, использую запрос
>SELECT *
>FROM albums
>LIMIT :start, 30

>мне нужно чтобы подставленное значение было без кавычек, иначе происходит синтаксическая
>ошибка при выполнении запроса. Использование типа integer вместо string'а результатов
>не дает

А ты попробуй использовать не параметры а формировать строку запроса заранее,
после чего
добавлять эту строку в SQL, типа:

var
s:string;
start:integer;
.....
start:=4;

s:='SELECT *;
s:=s+' FROM albums';
s:=s+' LIMIT '+ IntToStr(start)+', 30';

SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add(s);
SQLQuery1.ExecSQL;

С уважением,
Селезнёв Денис

Номер выпуска : 4672
Возраст листа : 635 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/386753
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Денис Селезнев   ответов: 0   2005-06-17 20:49:13 (#386753)

Очень странно

"Кидаю" на форму панель, выставляю у неё нужный цвет (допустим белый),
компилирую, смотрю, всё ok, добавляю компонент XPManifest, компилирую
и вижу что у панели такой же цвет как и у формы на которой она
расположена. Почему??

У панели свойство ParentColor = false.
Delphi7.

     ответов: 2   2005-06-17 20:49:01 (#386267)

Re: dbExpress в Delphi

Приветствую, Lucky!

>Использую компонент TSQLQuery из закладки dbExpress. Проблема при использовании
>в SQL запросе параметров - он почему-то все подстановки заключает в одинарные
>кавычки. Например, использую запрос
>SELECT *
>FROM albums
>LIMIT :start, 30

>мне нужно чтобы подставленное значение было без кавычек, иначе происходит синтаксическая
>ошибка при выполнении запроса. Использование типа integer вместо string'а результатов
>не дает

А ты попробуй использовать не параметры а формировать строку запроса заранее,
после чего
добавлять эту строку в SQL, типа:

var
s:string;
start:integer;
.....
start:=4;

s:='SELECT *;
s:=s+' FROM albums';
s:=s+' LIMIT '+ IntToStr(start)+', 30';

SQLQuery1.SQL.Clear;
SQLQuery1.SQL.Add(s);
SQLQuery1.ExecSQL;

С уважением,
Селезнёв Денис

Номер выпуска : 4670
Возраст листа : 635 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/386751
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Денис Селезнев   ответов: 0   2005-06-17 20:48:45 (#386751)

Re[2]: Компонент

>, monah

m> Вообще все можно реализовать стандартными средствами.

Как?

     ответов: 3   2005-06-17 19:30:05 (#386255)

SOS!

Небольшая проблема:

Нашёл я как-то в интернете компоненты "TMS Adv Page Control" и "Degisy
Control Suite", создал я тест программу для проверки этих компонентов
и при запуске тест программы я увидел маленькое окошко и в нём
сказано что - "Если вы не хотите видеть это окно каждый раз при запуске
вашей программы, то купите этот компонент. Цена $30"

Так вот - это окно появляется ТОЛЬКО тогда когда закрыт Delphi, а
когда он открыт и я запускаю программу - то никакого окно нет! :)
Это означает только то что компонент как-то узнаёт запушен ли Delphi
или нет и следовательно из-за этого выполняет действие (показать окно
или нет).

А как создать такую иллюзию для компонента?

А может быть можно как-то при старте программы вообще не дать этому
Nag-окну появится?

     ответов: 2   2005-06-17 17:47:24 (#384604)

Delphi звук

Здравствуйте програмеры!

Как воспроизвести звук определенной частоты , как
это делает windows.beep , только через звуковую карту ?

     ответов: 10   2005-06-17 17:36:00 (#379405)

Re: Low-Level DB

Hello, Александр!

On Tue, 7 Jun 2005 16:18:39 +0500 you wrote:

> Хочется в программе сделать поддержку прав, прога вообще без формы
> (даже на чистом API). Я так подумал что проще всего хранить юзеров,
> пароли и права в базе, чем создавать велосипеды с record-ами, тем
> более что удалять из файла с record-ами геморройно. Впрочем я отвлекся
> :)
>
> Я хочу реализовать в своей программе работу с базами без всяких
> компонентов, на низком уровне. Но т.к. в базах я ПОЛНЫЙ профан, я
> остановился в самом начале - создание базы, выбор из нее записи о
> юзере и вытаскивания из нее его прав, редактирование базы.
> При всех этих проблемах я еще одну себе добавил - желательно чтобы
> база работала на MSSQL Server, насколько я понял он есть во всех
> виндовозах от win98 (если тупость написал - сильно не пинать, лучше
> подскажите базу которая есть во всех виндовозах без всяких MS Office)

Хе, MSSQL Server - 190 тыс. руб. за однопроцессорную лицензию.
Нету в винде sql-сервера по умолчанию.
А тягать с собой MySQL (или что еше хуже Posgres) - это конечно
благородное занятие, но для таких задач бессмысленное.

   "B."   ответов: 20   2005-06-16 22:42:44 (#380353)

Установка Компонента2

>, comp

При установке старого компонента (1998 года выпуска) Delphi требует файл DsgnIntf.dcu
Может у кого-то из вас он есть?

и ещё - Как устанавливать .dcu компоненты?
просто при попытке установить компонент который состоит всего лишь из
dcu файла Delphi7 выдаёт ошибку: One or more lines were too long and have been
truncated

     ответов: 1   2005-06-16 22:11:44 (#384600)

Dock

Как сделать "Летающе-Липкую" панель инструментов как в Microsoft Word 2003 или
как
в The Bat!е ?

Какие компоненты нужны?

     ответов: 6   2005-06-16 12:07:17 (#384796)

Вопрос

Здравствуйте, comp.

Кто ни будь может объяснить толком, как в Sorce Safe делается копия
или версия проекта и как её потом получить назад полноценную и
продолжить над ней работу?

   Виктор   ответов: 0   2005-06-16 01:53:26 (#385610)

SOS!

Небольшая проблема:

Нашёл я как-то в интернете компоненты "TMS Adv Page Control" и "Degisy
Control Suite", создал я тест программу для проверки этих компонентов
и при запуске тест программы я увидел маленькое окошко и в нём
сказано что - "Если вы не хотите видеть это окно каждый раз при запуске
вашей программы, то купите этот компонент. Цена $30"

Так вот - это окно появляется ТОЛЬКО тогда когда закрыт Delphi, а
когда он открыт и я запускаю программу - то никакого окно нет! :)
Это означает только то что компонент как-то узнаёт запушен ли Delphi
или нет и следовательно из-за этого выполняет действие (показать окно
или нет).

А как создать такую иллюзию для компонента?

А может быть можно как-то при старте программы вообще не дать этому
Nag-окну появится?

     ответов: 0   2005-06-14 13:53:50 (#384602)

Установка Компонента2

>, comp

При установке старого компонента (1998 года выпуска) Delphi требует файл DsgnIntf.dcu
Может у кого-то из вас он есть?

и ещё - Как устанавливать .dcu компоненты?
просто при попытке установить компонент который состоит всего лишь из
dcu файла Delphi7 выдаёт ошибку: One or more lines were too long and have been
truncated

     ответов: 0   2005-06-14 13:53:35 (#384601)

Установка Компонента

>, comp


При установке компонента 'EasyNet' Delphi7 выдаёт ошибку:

Cannot load package 'IcsDel7070'. It contains unit 'IcsUrl', which is also contained
in package 'IcsDel70'

Что это значит?

     ответов: 3   2005-06-14 13:53:14 (#383696)

Разработка типа компилятора

добрий день всем.
вопрос мой такой- нужно создать программу, которая создает программу.
т.е. программа должна создавать ехе-шку , которая потом выполняется.
подскажите если кто знает..примеры ссылки для начала.
в общем нужно направление мысли задать!

спасибо
Олег

mailto:ol***@c*****.ua

Номер выпуска : 4572
Возраст листа : 625 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/380382
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   ol   ответов: 10   2005-06-14 09:46:38 (#380382)

Инициализация

>, comp


! Какие типы объектов нужно Инициализировать?

к примеру:

если я создаю переменную "perem" типа TFileStream то мне нужно
результат TFileStream.Create(...); присвоить в переменную perem.

Я заметил одну вещь:
Объекты начинающиеся с буквы T (TFileStream, TStream, TBitmap) т.е.
буква T стоит вначале не в "тему". Это заметно когда тип начинается
с заглавной буквы T из за этой буквой тоже стоит заглавная буква (думаю вы
меня поняли :)

Вопрос: Какие типы нужно Инициализировать, а какие нет?
Что вообще обозначает эта буква T? Зачем она?
Ведь у типа данных integer нет ни какой буквы T в начале.

     ответов: 9   2005-06-13 11:03:58 (#381527)

Полезные функции

>, comp


Есть полезная функция SizeOf(Perem) которая возвращает размер переменной
указанной в скобках,
а какие есть ещё полезные функции?

     ответов: 1   2005-06-12 20:39:40 (#383694)

MSDN CD

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Есть тут кто-нибудь из Перми?
Интересует subj, желательно поновей. Может какая добрая душа закатает
мне его на болванку?

PS: C меня пиво :)

     ответов: 0   2005-06-10 23:07:57 (#382689)

Горю!!!

ВрЕМеЧк0 д0бРеНьк0е, comp,

Помогите найти исходники игры "морской бой" - сетевой

     ответов: 1   2005-06-10 18:47:17 (#382033)

Вопрос

Здравствуйте, comp.

Подскажите пожалуйста. Когда объявляешь тип данных типа void (я так
понимаю что это пустой тип, не имеющий значения), компилятор почему то
выделяет под него память 2 или 4 байта в зависимости от компилятора.
Для чего под этот тип выделяется память?

Виктор mailto:vict***@c*****.ru

Номер выпуска : 4579
Возраст листа : 626 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/380687
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Виктор   ответов: 2   2005-06-08 21:47:50 (#380687)

Re: Delphi: Console Input + SetLength

Здравствуйте !

> Почему данный код вылетает с Violation-ом после ввода по такому
> принципу: следующий введенный набор символов короче чем предыдущий?

> Readln(TmpBuf);
> vSize := Length(TmpBuf);
> SetLength(Buf, vSize); <ошибка вылетает вот здесь
> lstrcpy(@Buf, @TmpBuf);

Может, я глубоко заблуждаюсь, но, имхо:
TmpBuf - паскалевская строка (то есть длина хранится в 1-м байте) ?
lstrcpy копирует null-terminated строки (с завершающим нулем), то есть
при копировании из области памяти, указанной @TmpBuf, может производить
чтение за допустимыми границами (тут может и ошибка защиты вылезти).
Т.к. lstrcpy еще и пишет в Buf, длина которого установлена, кстати,
равной длине строки TmpBuf, то тут также может возникнуть ошибка
защиты (уже на запись).
Не знаю что делает SetLength (как работает, точнее), но судя по всему,
т.к. ее назначение - изменить размер выделенного блока памяти (подобно
realloc (сишной), то, надо полагать, при выделении блока памяти, для
блока выделяется размер больше указанного и вначале (например),
блока хранится служебная инфа (о азмере блока, и.т.д.).
Ее (служебную инфу) можно легко перетереть 9возможно этои случается).
Тогда при следующих манипуляциях с этим блоком (попытке удалить,
изменить размер) и будет валиться.

Что можно посоветовать.
Если уж нужно скопировать из паскалевской в null-terminated строку, то
воспользоваться, например, memcpy (т.к. длина строки известна) и еще
выделить Buf на 1 побольше и проставить в конец Buf 0.

--
С уважением, Вахтуров Виктор.

Номер выпуска : 4574
Возраст листа : 625 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/380458
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 5   2005-06-08 21:36:13 (#380458)

Отследить конец страницы в WebBrowser

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Как subj при скроле?
Я нашел как скролить
WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, 100);
или
var
WebBrowser: IWEBBrowser;
...
procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
WebBrowser := pDisp as IWEBBrowser;
...
(WebBrowser.Document as IHTMLDocument2).parentWindow.scrollBy(0, 100);

в MSDN написано
IHTMLWindow2::scrollBy Method
Return Value
Returns S_OK if successful, or an error value otherwise.

И вот по этому S_OK я и хотел ловить конец страницы при скролле.

(WebBrowser.Document as IHTMLDocument2).parentWindow = IHTMLWindow2

Но почему-то в MSHTML scrollBy описан как procedure, да и
v: variant
v := WebBrowser1.OleObject.Document.ParentWindow.ScrollBy(0, 100);
v = Unassigned (всегда)

Еще была идея отслеживать текущую позицию скролбара и переходить на
следующий файл если она не изменяется. Нашел вот что (в MSHTML):

DispHTMLDivPosition.style: IHTMLStyle;
IHTMLStyle.position;

Но как добраться до

DispHTMLDivPosition = dispinterface

я не знаю.

В общем вот что я хочу получить:
Имеется список файлов (TListView) при клацании пробелом на файле
происходит его скроль в WebBrowser, при достижении конца файла -
переход на следующий. В общем принцип как The Bat! при прочтении
писем.

     ответов: 2   2005-06-08 19:58:25 (#376347)

Фленов М. Е. Программирование в Delphi глазами хакера.

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Почитал сегодня сабж. Думаю настоящие хакеры должны Фленова поймать и
морду набить :)

Вы только посмотрите как он реализует задержку в 1000 мс:

h:=CreateEvent(nil, true, false, ' ' ) ;
WaitForSingleObject(h, 1000);
CloseHandie(h);

А насчет sleep есть отмаз:
Вот таким небольшим трюком мы делаем паузу в выполнении программы.
Есть еще одна функция для осуществления задержки sleep. Она проще
в использовании, но загружает систему, поэтому я ее не использую.

И после этого Фленов еще пишет что дескать надо досконально знать
систему в которой программируешь :)

PS: Качал с
http://didream.33.com1.ru:8032/WWW/books/programming/Delphi%20by%20Hacker.rar
нашел на форуме www.dayz.ru/forum

     ответов: 25   2005-06-07 21:02:16 (#377440)

SQL запрос в delphi

Здравствуйте програмеры!

Помогите создать sql запрос для базы Аксес.
Нужно выбрать поля типа MEMO в которых встречается определенное
значения типа string

     ответов: 4   2005-06-07 10:02:16 (#379232)

error LNK2005: VC++ 6.0

Glad to greet!

Когда-то уже писал о данной проблеме, но сейчас снова выплыла.
Есть хидер (xxx.h), в котором определяется переменная и значение
(int i=1) или функция и реализация. Затем они include-ятся в другом
файле (yyy.h), который в свою очередь include-ится в 3-ем (zzz.h).
На этапе линковки вылезает такое вот сообщение:
"yyy.obj : error LNK2005: "int i" already defined in zzz.obj"

Естественно, в ххх.h стоят #ifdef-ы, так что подключение происходит
лишь единожды. Объявлять переменную как static не подходит,
поскольку в таком случае у каждого подключившего хранится своя
копия переменной, а не одна на всех (что меня несколько озадачило).
При указании /FORCE:MULTIPLE линкеру лезут warning-и, которые
pragma-ой не отключить, да и явно должен быть какой-то куда более
простой способ, однако моих поверхностных знаний с++ тут явно
недостаточно. Как с этим побороться? Заранее спасибо.

Alles Gute!

...In Code We Trust...

     ответов: 15   2005-06-06 12:14:07 (#370348)

MFC - банальный вопрос

Glad to greet!

Потихоньку занялся освоением MFC. Сразу захотелось избавиться от
морганий. Сделал CreateCompatibleBitmap, в который всё выводится, а
затем в OnPaint вызываю BitBlt для DC окна. Однако моргание очень
сильное. Видно, что отрисовывается серый фон диалога (хотя в OnPaint
нет вызова родительского метода OnPaint), а затем выводится мой
CBitmap. Я явно не первый с таким вопросом. Полагаю, что есть
довольно простое решение. Заранее благодарен за ответ.

Alles Gute!

...In Code We Trust...

     ответов: 1   2005-06-01 20:49:17 (#335583)

Delphi 7. Самоучитель Климова Л. М. 1-е издание

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Есть ли у кого-нибудь дискетка с примерами к сабжу?
Если есть - киньте пжалста на мыло (внизу), а то я уже пол нета
облазил, не нашел нифига. А во вторую половину не знаю как попасть :)
По библиотекам которые знаю тоже полазил - нету нифига. А edulib.ru
вообще с первого апреля не работают (приколисты, блин). Нашел только
книгу второго издания, но мне нужны примеры именно первого.

PS: Если нет ни у кого примеров - киньте ссылок на электронные
библиотеки.
PPS: Если примеров нет, а книга есть - кидайте книгу.

     ответов: 0   2005-06-01 12:24:39 (#377463)

Патент?

...::: Приветствую, comp :::...

Вот если я придумал какое-то название, к примеру название для своей
фирмы то как мне сделать так чтобы никто не мог кроме меня говорить
что он хозяин этого 'Названия'?
То есть нужен какой-то документ (патент?) подтверждающий то что именно мне
принадлежит это 'название' относящиеся к данной организации.

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 4525
Возраст листа : 615 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/375158
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-05-29 14:01:06 (#375158)

Зеркальное отображение

Hello comp,

Добрый всем день!

подскажите не сталкивался ли кто с такой вещью- нужно обеспечить
зеркальное отражение дисплея. Т.е. на дисплее информация зеркально
отражена. не для окна пользовательской программы, а для десктопа в
целом.
Спасибо..подскажите куда копать!

   ol   ответов: 3   2005-05-27 23:20:14 (#373644)

Delphi. Вызвать диалог как подчиненный.

Здравствуйте все,

Вопрос такой, есть у меня СОМ-сервер, в котором есть функция вывода
диалога. СОМ-сервер реализован как ехе-файл.
Когда я вызываю метод сервера диалог должен отобразиться подчиненным
вызываемому приложению. Как это сделать?
Сейчас когда я вызываю метод вывода диалога у меня как бы и сервер
выскакивает и приложение вызвавшее. Хэндл приложения есть, что дальше?

     ответов: 3   2005-05-27 21:18:58 (#373346)

Delphi ООП: Как изменить property?

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Я хочу к компоненту TListView добавить фичу - свойство Visible к
колонкам.
Реализация скрытия уже давно готова, просто решил сделать себе
"красиво" :)

Требуется у TListView изменить в Columns(TListColumns) TListColumn:
Нужно добавить к TListColumn свойство Visible для последующей
проверки.
Вот тут-то и запарка:
Насколько я понимаю нужно во всех изменяемых классах последовательно
заменить упоминание TListColumns на TListColumns_ (мой класс) и
TListColumn на TListColumn_, но я столкнулся с проблемой:
procedure TCustomListView.SetListColumns(Value: TListColumns);
эта процедура описана в private и следовательно в моем модуле я ее не
вижу, а эта процедура как раз property и заведует.
Вопрос: как ее overrid-нуть?

     ответов: 2   2005-05-24 21:00:05 (#372589)

Перехват MessageBox-сообщений

Здравствуйте, коллеги.

Хочу написать свой компонент, что бы перехватывать все диалоговые
сообщения функций MessageBox, ShowMessage и другие, и вместо
стандартных этих окон рисовать свои.
Кто-нибудь может подсказать, как можно перехватить такие функции и
выполнить свои действия ?

   Feniks   ответов: 8   2005-05-21 03:09:47 (#366968)

Редактор текста [Delphi7] [WinXP]

Приветствую.

Передо мной стоит задача: написать что-то типа Delphi'йского code editor'а,
только в очень упрощённой форме.

Основные требования к редактору:
1. Сделать, чтобы можно было работать со строками текста как в Delphi т.е. в
Delphi, например, можно переместить курсор на произвольное место в в строке,
независимо от того написан ли там текст или же нет.
2. Сделать "подсветку синтаксиса" к определённым словам (чтобы они
выделялись bold'ом и/или цветом).
3. Сделать, чтобы в редакторе был шрифт Counter New и сделать так, чтобы
если пользователь вставляет кусок текста, который напран шрифтом Arial
(например), то чтобы этот текст вставлялся шрифтом Counter New. Вобщем,
чтобы всё было шрифтом Counter New.
4. Сделать, чтобы если при неподвижном курсоре мыши пользователь набирает
текст, то курсор мыши никуда не исчезал (он пропадает куда-то если
использовать RichEdit).

Вобщем требуется, чтобы редактор был максимально похож на code editor для
Delphi.

Я пытался разобраться с компонетом RichEdit, но по этому компоненту мне не
хватило справки, а пример, который входит в Delphi не удовлетворяет
требуемым условиям. Поэтому и застрял практически на всех пунктах.
Или может быть именно для написания таких редакторов нужно использовать
специальные компонеты, а не RichEdit?
Подскажите пожалуйста.

С уважением, Lakmus
ICQ - 241479153
www.nvkz.net/lakmus

Номер выпуска : 4500
Возраст листа : 604 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/369259
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-05-19 19:13:57 (#369259)

Delhi - ValueListEditor

Здравствуйте програмеры!

Подскажите, как при програмном изменении ячейки сохранить в ней фокус
ввода и снять выделение с текста.

     ответов: 0   2005-05-17 21:55:39 (#369252)

Re: Proxies.pas

Здравствуйте, GENEMI,

Monday, May 16, 2005, 12:09:14 AM, вы писали:

G> ...::: Приветствую, comp :::...

G> Один компонент требует файл Proxies.pas а его у меня нет, может быть у
G> кого-то из вас есть, то не если несложно отправьте его мне на
G> cern***@b*****.ru
Сделай поиск в инете, эта тема развернута сильно. Насколько я помню
его(proxies.pas) не надо, нужно при установке компонента настроить
свойства, типа поставить галочку Design mode only.

     ответов: 4   2005-05-17 14:02:39 (#368349)

RAS Disconnect DialUp

Привет comp,

Есть такая проблема:
Delphi
Функция Disconnect: Boolean - разрывает активное DialUp соединение
Написана, используя библиотеку RAS
ОС: WinXp, Win98 - работает
Win2k SP4 - не работает, и в чем проблема не найду!

Афоризм напоследок: Если из положения нет выхода, надо поменять положение.
Winamp глаголит: Zdob-si-Zdub - 02 Hunta wxtremala
16 мая 2005 г. 20:07:50

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4492
Возраст листа : 603 (дней)
Количество подписчиков : 518
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/368558
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-05-17 11:46:22 (#368558)

Delphi BD

Здравствуйте програмеры!

Как в Delphi создать базу данных?

     ответов: 8   2005-05-16 20:18:33 (#366484)

Re[4]: VBScript

Здравствуйте, Антон.

Вы писали 16 мая 2005 г., 9:36:32:

Всем спасибо ... Разобрался ...

Основное правило программирования - RTFM :)

   Антон Горячун   ответов: 0   2005-05-16 13:01:17 (#368301)

Re[3]: VBScript

Здравствуйте, Антон.

Вы писали 16 мая 2005 г., 9:17:24:

Все сделал. Не открывается.
Синтаксис "debugger"?

AN>> 3. В тексте скрипта в любом месте пишете:
AN>> debugger
AN>> И он откроется :)

   Антон Горячун   ответов: 0   2005-05-16 10:36:03 (#368199)

VBScript

Здравствуйте, comp.

Чем можно делать отладку кода?

   Антон Горячун   ответов: 4   2005-05-16 10:19:32 (#367474)

Connection Speed

Доброе время суток, народ!

Задача следующая: оценить скорость текущего соединения с другой
машиной (диалап). Какие-нибудь мысли в общем виде... Понимаю, что
формулировка "сырая", но лучше пока "родить" не могу (наверное, где-то
знаний не хватает :-))
Скорее всего реализация на Visual C++, подозреваю, что связано это
будет с работой с сокетами... а дальше хотелось бы услышать Ваши
подсказки.

--
С наилучшими пожеланиями,
Eugene mailto:aevd***@m*****.ru

Номер выпуска : 4467
Возраст листа : 600 (дней)
Количество подписчиков : 518
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/367194
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-05-14 22:52:07 (#367194)

Re: Apache != mail-server

Eugene Izvekov пишет:
> Приблизительный метод работы:
> на xx порт (POP3, наверное) приходит письмо. Апач слушает xx порт

Вернее SMTP

SMTP и HTTP по своей структуре совершенно разные протоколы. Поэтому SMTP
клиент никак не договорится с HTTP сервером :( Нужен посредник
принимающий письмо по SMTP и отсылающий его по HTTP.

> (окромя 80 и 8080) и при получении письма mod_rewrite'ом делает
> редирект (Virtual Host) на скрипт PHP, который распарсивает письмо и генерирует
>
> ответ (используя MySQL). Ответ посылается в xx порт (SMTP необходимому серверу).

Ответить можно. Хотя-бы через mail().

     ответов: 4   2005-05-14 09:02:47 (#367280)

Re: 3D графика

> И еще - что лучше - Direct3D или OpenGL?

ИМХО, причём очень большое.

D3D - преимущества :

1. ООП ориентированность. Хоть и под маской COM. Отсюда, в частности,
простота использования и упрощение обеспечения совместимости с будущими
расширениями.
2. Отсутствие стандартов (окромя диктуемых самой MictoSoft), что ускоряет
введение новых возможностей. Смотри однако ниже о GL.
3. Более высокое абстрагирование от hardware. Под hardware в общем случае
понимается, что угодно. Хоть и полностью программная реализация.
4. Тонкость (при наличии достаточно xxx-endового hardware) программной
прослойки между приложением и GPU.

D3D - недостатки:

1. Реализованность только под Windами. По крайней мере - пока.
2. Сложнее в изучении.
3. Требует инсталляции proxy-библиотек - самих интерфейсов D3D.

GL - достоинства:

1. Наличие международных стандартов. Причём и на устояшвиеся расширения.
2. Проще в изучении.
3. Реализованность под всеми уважающими своих юзеров платформами.

GL - недостатки:

1. Интерфейс - функционально ориентированный. Остюда, в частности, более
неудобное использование и бОльшая вероятность ошибок.
2. Расширения, пока не стандартизированы, непереносимы. Отсюда длительные
задержки с введением открытых расширений. Яркий пример - шейдеры.
3. Использование расширений - жутко неудобное. Правда, один раз (на каждое
расширение) повозившись, (и не без ООП ;-) ) эта проблема решается. А сильно

повозившись (и не без generic programming paradigm 8-} ), один раз не ВСЕ
расширения.
4. "Черезчурная" (по сравнению с D3D) переносимость противоречит (на уровне
конкретных реализаций)
а) скорости как hardware, так и software;
б) полному покрытию возможностей hardware;
в) в итоге "развязыванию рук" поставщиков hardware и потребителей,
каковыми в данном случае являются программисты.

Резюмиря по сумме плюсов и минусов (без весовых коэффициентов - желающие
пусть сами отранжируют и получат свои результаты): D3D лучше. Но не более,
чем в большинстве случаев. Однако ж есть и меньшинство...

В косвенное подтверждение своего ИМХО: всем (многим?) известна серия 3DMark.

Кто-нибудь видел GLMark-и???

P.S. Если кто видел, дайте URL plz.
И снова обращаю внимание - это ИМХО. Если есть возражения - не стесняйтесь.
В конце концов экспертом в этой области себя не считаю. Если есть желание
подискутировать, во избежание флуда прошу в личку.

--
С уважением, boroda
mailto:boroden***@s*****.ru

Номер выпуска : 4456
Возраст листа : 598 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/365456
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Шматко А.А.   ответов: 7   2005-05-13 08:45:15 (#365456)

CClientDC

Доброй поры суток...

Есть проект, в котором нужно многократно выводить графку...
1. Сам проект основан на CFormView
2. Вывод осуществляется с помошью примерно следующей конструции:

CClientDC pDraw;
pDraw.MoveTo(100,100);
pDraw.LineTo(200,200);

Рисовать-то он рисует, но вот через 2-3 тысячи циклов, вывод заметно
тормозится, а ещё через столько же выдаёт "Запрашиваемый ресурс не
доступен" и внаглую, закрывается...

Если я правильно понимаю, то вся графика выводится поверх старого
контекста...Может, есть какая-то функция, которая бы обнуляла всё
содержимое?

Подскажите, кто знает!
Заранее пасибо!

Павел a.k.a BOER mailto:bo***@p*****.net

Номер выпуска : 4444
Возраст листа : 595 (дней)
Количество подписчиков : 513
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/364312
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 3   2005-05-11 02:43:58 (#364312)

Re: вывод текста на рабочий стол

Здравствуйте, Леонид.

Вы писали 5 мая 2005 г., 15:25:58:

Получи контекс рабочего стола. Если в Delphi то
cn:=GetDC(0);
Потом выводишь текст на контекст, или присваеваешь это значение канве.
Canvas.hendel:=dc; и Делай что хочешь.

     ответов: 9   2005-05-10 13:58:11 (#362398)

Ресурсы по 3D Max

Здравствуйте.

Понимаю, что вопрос не по теме рассылки, но все-таки... Не подскажите
обучающемуся 3D Max русскоязычные сайты по этому самому 3D Max. Не то
учить приходится по хэлпу да туториалу, но хотелось бы и на русском
почитать что-нибудь об этом пакете и приемах работы в нем.
Самостоятельные поиски дали только пару статей для уже хорошо
ориентирующихся. Впрочем, интересует все, что связано с 3D Max.

   Шешунов Вадим   ответов: 5   2005-05-09 11:30:40 (#359924)

Mathcad DLLs

Здравствуйте, все!

После ковыряний в директории программы Mathcad выяснилось, что оная
для осуществления математических расчетов использует динамически
линкуемые библиотеки (DLL).
Нужно узнать о входящих в эти библиотеки функциях (как, и чем), а
также информацию об их использовании.
Может быть, кто-нибудь знает ресурс, посвященный этой теме?
И ещё вопрос: как (чем) узнать, какие есть процедуры и функции в
DLL. Не хотелось бы ходить с бубном вокруг библиотеки (с консольными
программульками), а иметь специальную для этого программку с
графическим интерфейсом :)

Если кто-нибудь подскажет, буду признателен.

     ответов: 6   2005-05-05 21:20:57 (#361635)

Interactive logon

Вот, понадобился программый сабж.
Не получается. Взял пример из MSDN по адресу "Security\Security
(General)\SDK Documentation\Authorization\Using Authorization\Using
Client/Server Access Control\Starting an Interactive Client Process" плюс
пара функций из "Security\Security (General)\SDK
Documentation\Authorization\Using Authorization\Using Client/Server Access
Control\Getting the Logon SID". Компилится, запускается, не работает. Всё
проходит без ошибок, кроме заключительно CreateProcessAsUser(), который
завершается с GetLastError()==ERROR_PRIVILEGE_NOT_HELD. Как же это
понимать-то? Исходные самплы из MSDN не работают.
Причём с помощью CreateProcessWithLogonW() можно заставить нужное приложение
запуститься под другой учёткой, но в текущей интерактивной сессии, вместо
собственной вновь создаваемой.
К тому же дело не в создании сессии. Ибо LogonUser() отрабатывает без
проблем, да и результат не зависит от того, создана ли нужная интерактивная
сессия заранее или нет. Тот же стандартный шедулер-то запускает сессими.
Правда пакетные, а не интерактивные, но и с пакетными у меня такая же фигня.
Я сильно подозреваю, что моему процессу не хватает какого-то токена. Вот
только какого?
Правда, возможно это всё должно работать в качестве службы, а не обычного -
пусть и под админом - приложения. Но в самом MSDN-е об этом вроде не
упоминается. Да и пробовал я включать в локальных политиках во "Вход в
качестве службы" свою и целевую учётки. Или я ошибаюсь, что это уравняло бы
права моего процесса со службой? Может быть надо было "Работа в режиме
операционной системы"?
Происходит это всё под WinXP rus SP2. Моя и целевая учётки - локальные.
Доменов нет. В качестве имени домена указываю "." как и советует MSDN.
У кого какие мысли, а лучше опыт?

--
С уважением, boroda
mailto:boroden***@s*****.ru

Номер выпуска : 4429
Возраст листа : 592 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/362121
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Шматко А.А.   ответов: 5   2005-05-05 20:26:24 (#362121)

Borland BDE Merge Module

Здравствуйте.

У кого-нибудь есть модуль Borland BDE Merge Module версии 5.1.1
(файл .msm). Это файл BDE_ENT.msm (BDE ENTerprise - кажется так пишется).
Он необходим для создания MSI дистрибутивов. Он мне очень нужен, если у
кого есть, поделитесь. Бо инета у меня нету, что бы его скачать.

   Feniks   ответов: 0   2005-05-05 14:26:00 (#362110)

MFC+гоячие клавиши

Glad to greet!

Ситуация такова: написал заготовку класса наследуемого от CDialog и
захотелось добавить реакцию на нажатие клавиш. Поставил реакцию на
WM_CHAR, WM_KEYDOWN/UP - ни один из методов не вызывается (окно в
фокусе). Решил пойти через Accelerator, но обнаружил, что
LoadAccelTable есть только у CFrameWnd. Каким образом обрабатывать
нажатие клавиш и как их отлавливать? Заранее спасибо!

Alles Gute!

...In Code We Trust...

     ответов: 9   2005-05-05 13:03:32 (#352139)

Регистрация класса CPropertySheet (С++)

Всем привет!
Есть такая проблема: класс-наследник CPropertySheet является главным
окном приложения. Его необходимо зарегистрировать с новым именем. Для
этого обычно используется функция PreCreateWindow(CREATESTRUCT&cs).
Однако в диалогах и property sheet эта функция не вызывается. Как можно
зарегистрировать этот класс?

С уважением, Ольга.

Номер выпуска : 4383
Возраст листа : 578 (дней)
Количество подписчиков : 515
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/354782
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 7   2005-05-05 10:23:54 (#354782)

З-х мерная презентация.

Здравствуйте!
Я архитектор и мне часто приходится сталкиваться с невозможностью
представить заказчику свое решение. Я обычно делаю картинки и анимацию
в 3DS MAX, но они не передают просторанство так, как бы мне хотелось.
Хорошо было бы , чтобы заказчик мог походить по объекту, как в
компьютерной игре, посмотреть вверх, вниз, пройтись по лестнице.
Нет ли возможности как нибудь внедрить мою трехмерную модель в
компьютерную игру типа "Квейк"? Или может быть можно как-то применить
ей движок отдельно?

Номер выпуска : 4407
Возраст листа : 587 (дней)
Количество подписчиков : 511
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/359535
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-05-02 18:25:30 (#359535)

MFC Dialog-based

Здравствуйте, comp.

Это мой первый серьёзный проект на VC++ 6.0
В общем, имеется MFC Dialog-based проект, и в нём такие вот проблемы:
1) Toolbar - стоило больших трудов туда его запихать, и тем не менее мне это
удалось.
Тулбар показывается! Но те 2 кнопки что на нём, работают в режиме Radio!
А мне надо 2 независимые кнопки!
toolbar.CreateEx(this, TBSTYLE_FLAT | TBSTYLE_BUTTON, ....)
не прокатывает! Я не знаю что делать...^^^^^^^^^^^^^
2) При попытке вызова MessageBox() или ::MessageBox() из любого места программы
(даже из главной формы) приложение просто зависает...
Отладчик показывает что это происходит при вызове ::MessageBox()с
GetSafeHandle() <> 0. Если же поставить 0, то окно появляется, но не как модальное,
в общем не то... Тоже в тупике...

   Виталий (aka VK220)   ответов: 1   2005-05-01 18:12:02 (#355750)

Библия Delphi

...::: Приветствую, comp :::...

Заходил на www.books.ru нашел там книжку от Мишки Фленова "Библия
Delphi" так там написано что она есть в электронном варианте мож кто
из вас знает ссылочку на эту версию?

...::: by GENEMI :::...

Номер выпуска : 4222
Возраст листа : 557 (дней)
Количество подписчиков : 526
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/343114
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 12   2005-05-01 00:43:26 (#343114)

[C++Builder/Delphi] Размещение Контрол-компонентов на компоненте TSplitter

Здравствуйте, comp.

Кто-нибудь может подсказать, как на компонент TSplitter можно
положить кнопку TButton или любой другой Контрол ?
Где-то я давным-давно читал, что для этого надо изменить какое-то
свойство в TSplitter, да бы разрешить ему быть родителем для
Контролов.

У кого будут какие соображения ?

   Feniks   ответов: 2   2005-04-28 22:24:35 (#357818)

Динамические массивы

Привет comp,

Как-то я поднимал вопрос об использовании списков на указателях.
Кто-то посоветовал использовать динамические массивы, утверждая, что
добавление у удаление элемента массива из списка можно стелать за
статическое время, а не за динамическое (линейное), как с
классическими массивами.

Вопрос: как удалить элемент в середине динамического массива (array
of TType) без цикла?

for i:= Del to MaxN-1 do Mas[i]:=Mas[i+1];

Афоризм напоследок: У свободы есть крупный недостаток: все свои проблемы придется
решать самостоятельно.
Winamp глаголит: Кино - Мои друзья
24 апреля 2005 г. 9:04:52

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4402
Возраст листа : 583 (дней)
Количество подписчиков : 512
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/357596
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-04-28 21:52:16 (#357596)

[C++Builder/Delphi] Размещение Контрол-компонентов на компоненте TSplitter

Здравствуйте, comp.

Кто-нибудь может подсказать, как на компонент TSplitter можно
положить кнопку TButton или любой другой Контрол ?
Где-то я давным-давно читал, что для этого надо изменить какое-то
свойство в TSplitter, да бы разрешить ему быть родителем для
Контролов.

У кого будут какие соображения ?

   Feniks   ответов: 0   2005-04-26 14:08:06 (#357432)

Delphi 2005

Привет comp,

Тем кто пользуется Delphi 2005:
Есть проект переконвертированный в Delphi 2005 из Delphi 7: всё
хорошо - компилируется, новсе модули подчеркнуты, включая windows и
sysutils (есть там такая фишка - если не находит индитификатор, то
подчеркивает как Word неизвестные слова), а мои модули без проблем.
Т.к. стандартные модули не найдены, то все описание также
подчеркнуто (TForm, TLabel и т.д.).
Программа, использую ComObj, подключается к Inventor'у и выполняет
свои действия. Повторю: всё компилируется и работает нормально, а
так как есть эти ошибки, то Code Inside не работает - что достаточно
тяжело - привык.
Другая подобная программа (поменьше чем эта), написанная в 2005-х, -
без проблем.

Афоризм напоследок: Решил бросить пить. Утром следующего дня осознал: недобросил...
Winamp глаголит: XXXL Рок 7 - 20000 зажЫгалок - Клей
22 апреля 2005 г. 17:12:49

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4397
Возраст листа : 579 (дней)
Количество подписчиков : 515
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/355705
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-04-22 19:17:03 (#355705)

OpenGL

Привет,



Для чего используется функция glAreTexturesResident?

Если тектсура <не резидентна>, то кто ее должен подгружать:

моя прога или OpenGL драйвера?



Рома.

Номер выпуска : 4374
Возраст листа : 575 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/353135
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   "Roman Rudenko"   ответов: 1   2005-04-22 18:43:20 (#353135)

Access и VB

Привет,



Нужно на Access сделать тесты (база уже есть):

Человеку задается вопрос, на форме должен выводиться сам вопрос, ответы
(checkbox'ы) и кнопка <Ответить>.

Количество возможных ответов- переменное, можно выбирать несколько ответов.

Подскажите, как это сделать на VB? (без создания новой формы)



Кто-нибудь может дать ссылки на нормальные книги на русском по VB?



Рома.




Номер выпуска : 4385
Возраст листа : 578 (дней)
Количество подписчиков : 515
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/354784
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   "Roman Rudenko"   ответов: 2   2005-04-21 21:31:51 (#354784)

Как отследить подключение клиента?

Здравствуйте все,

Ситуация такая. Изучаю СОМ и связанное с ним. По книжке. И вот
столкнулся с такой проблемой. Создал СОМ-сервер и соответственно
клиент. Но условие такое, что к одному объекту -серверу может
подключиться несколько клиентов. НО сервер должен отслеживать
клиентов.
Не могу понять как отследить, что клиент подключился к серверу.
Почитал события, но там только события, генерируемые сервером, а тут
получается событие инициируемое клиентом. Вот не могу понять как его
отследить.

     ответов: 6   2005-04-21 17:00:16 (#353629)

dll-ки для ODBC

Hello comp,

что нужно для работы программы, использующей ODBC для доступа к
файлам Access 2000, на машине, на которой нет офиса 2000? (какие-то
dll, может есть какой-нибудь пакет который ставит все dll и
прописывает все что нужэно в реестре???)

     ответов: 2   2005-04-21 16:59:52 (#354793)

Нефиксированная длина

Здравствуйте, comp!

В Delphi программировать начал недавно.
У меня небольшой вопрос...
Имеется тип:

type
TDocType=(TP_TEXT, TP_BITMAP);
TAnswer=record
AnswerText: TStringList;
AnswerBitmap: TBitmap;
Queue: integer;
Name: string;
end;
TAnswers=array of TAnswer;
TQuestion=record
QueType: TDocType;
AnsType: TDocType;
QuestionText: TStringList;
QuestionBitmap: TBitmap;
Answers: TAnswers;
Queue: integer;
Name: string;
end;
TQuestions=array of TQuestion;
TDocument=record
Name,
Author,
Version: string;
Max: integer;
Comments: TStringList;
Questions: TQuestions;
end;

Как TDocument сохранить в файл?
Я знаю, что нужны типы данных с фиксированной длиной, но всё-таки...
Можно сохранить не TDocument, а несколько TQuestion, тогда не будет
информации о документе...
Я так пробовал, но вместо TStringList сохраняется, естественно,
ерунда, а не сами строки.
Возможно ли вообще сохранить тип с нефиксированной длиной?

     ответов: 2   2005-04-18 20:41:18 (#352616)

Функция - как?

...::: Приветствую, comp :::...

function TForm1.MulNumber(index: Integer): Integer;
begin

if Index=1 then
begin
Result:=1;
exit;

end;
Result:=Index*MulNumber(index-1);

end;

Вот если эту функцию вызвать ( MulNumber(5) ) то она возвратит
факториал числа 5 - 120, но почему ведь перед выходом ( exit; ) стоит
присвоение ( Result:=1; ) и ведь это значит что функция должна
возвратить число 1, но почему получается иначе?

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 4281
Возраст листа : 566 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/348069
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 16   2005-04-16 19:49:12 (#348069)

Re: bit битность?

Приветствую вас, GENEMI!

G> Можете объяснить что такое биты, восьмеричная, двоичная,
шестнадцатеричная.

Это системы счисления. В школе учат десятичную, это когда 10 цифр от 0 до 9.

Двоичная это когда есть только 0 и 1, шестнадцатиричная это от 0 до F.
Шестнадцатиричная система очень удобна для компьютеров, так как достаточно
два знака, чтобы указать байт. В десятичной системе пришлось указывать 3
знака.

G> Что такое 8-битный, 16-битный и 64-битный?

Это процессоры. Это разрядность шины данных, т.е. сколько данных может
передать процессор за один акт своей работы. Грубо говоря, у него столько
проводков (лапок) для передачи данных.
Чем больше разрядность, тем производительнее процессор.

G> 8 бит-1байт и 32-битный это одно и тоже?

Нет.

G> Просто и процессор 32-битный и в программирование чего-то там битное
G> - как что все зачем это?

32-битный процессор имеет шину данных из 32 проводов :) В программировании
понятие "слово" разно разрядности процессора, поэтому простейший тип данных
Word будет иметь разрядность 32, т.е. от 0 до FFFF в шестнадцатиричной
системе. На этом числе очень много чего завязано в системе.

--
Drema, mailto:dremk***@m*****.ru
ICQ : 12207735

Американский антимонопольный комитет наконец-то придумал наказание для Билла

Гейтса: пожизненное форматирование дискет.

Outlook 11.0.0.5608 при помощи Potolook v.3.0.0.207b

Номер выпуска : 4255
Возраст листа : 563 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/346425
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 22   2005-04-15 13:51:53 (#346425)

Delphi 2005

...::: Приветствую, comp :::...

После установки запускаю этот Delphi о он выдает сообщение об ошибке:

"Класс не зарегистрирован ClassID: {3FB717AF-9D21-3016-871A-DF817ABDDD51}"

Что мне делать? OC: Windows XP SP2

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 4295
Возраст листа : 568 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/348523
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 6   2005-04-15 11:31:02 (#348523)

Функция - YES!!!

...::: Приветствую, comp :::...

Наконец-то я разобрался как работает рекурсия в этом умножении, уф!
вот решение:

Index=5
5 'пусто' 5-1
1) Result:= Index * MulNumber(Index-1)

4 'пусто' 4-1
2) Result:= Index * MulNumber(Index-1)

3 'пусто' 3-1
3) Result:= Index * MulNumber(Index-1)

2 'пусто' 2-1
4) Result:= Index * MulNumber(Index-1)

5) Index=1 , Result=:1; Exit;

----Начинается возврат(возврат значений) и закрытие вызванных функций 5) Result=1,Index=1 , ВЫХОД без УМНОЖЕНИЯ

2 2 * 1 1
4) Result:= Index * MulNumber(Index-1)

6 3 * 2 2
3) Result:= Index * MulNumber(Index-1)

24 4 * 6 3
2) Result:= Index * MulNumber(Index-1)

120 5 * 24 4
1) Result:= Index * MulNumber(Index-1)

Везде над переменными я вывел ихнее текущее значение.

Спасибо всем кто мне пытался это объяснить!
Спасибо!

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 4352
Возраст листа : 570 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/350073
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-04-15 11:29:33 (#350073)

Re: Visual Studio 2003

Приветствую!
On Fri, 8 Apr 2005 11:58:09 +0400
Шматко А.А. <boroden***@s*****.ru> wrote:

borodenko>
borodenko> на C:, который в свою очередь был NTFS.
borodenko> Какие мысли по поводу? Я не могу на работе без MVS2003.
Тут уменя проблемы с инетом и почтовиком ,не понял решили ли проблему.В
чем решение? В свое время наблюдал проблемы с установкой некоторых прог
если ХР была на D или на втором винте.Помогали танцы с бубнами.Грешил на
1024 цилиндр.Отключал винт или раздел.Ставил все в один раздел.В итоге
98 , NT4, ХРSP1, ХРSP2 на разных винтах :-(
AKA votum
I use OpenOffice.org

Номер выпуска : 4328
Возраст листа : 569 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/349524
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 4   2005-04-15 10:42:10 (#349524)

События и COM

Здравствуйте Все,
Пишу в Дельфи6.
Ситуация такая. Есть 2 модуля, которые должны взаимодействовать. Для
взаимодействия создается СОМ-сервер, который должен обеспечивать
передачу данных и активацию модулей.
Т.е. Пользователь(П) работает с Модуль1. Затем ему нужно
переключиться на работу с Модулем2. СОМ-сервер запускает модуль2, если
он не загружен и делает его активным приложением (типа фокус
передает). По идее Модуль1 не должен быть доступен. Т.е. программно я
в модуле1 вывожу диалог (например "завершите работу с модулем2") и
диалог должен пропасть, когда в Модуле2 П выполняет действие по
переходу в модуль1.
Какие идеи будут по реализации? В принципе СОМ-сервер готов, есть
функции, возвращающие статус конкретного модуля. А вот как в самому
модулю узнать, что его статус изменился?

     ответов: 0   2005-04-14 12:03:50 (#350763)

TListView -> MSWord

Доброго времени суток, все!

Есть TListView (vsReport) в Delphi 7. Как перенести значения, которые
содержатся в нем в MSWord в виде таблицы?

     ответов: 3   2005-04-13 19:24:14 (#349710)

Еще по БИТам

...::: Приветствую, all :::...

Зачем нужна восьмеричная и шестнадцатеричная система исчисления если
данные хранятся в двоичной системе исчисления.
Ведь как данные могут хранится в шестнадцатеричной ? она ведь состоит
из букв а как я знаю данные на носителях информации и да и вообще в
компьютере представлены в виде нулей и единиц.
Зачем тогда восьмеричная и шестнадцатеричная система исчисления?

И что значит 8-разрядный, 16-разрядный и 32-разрядный?

Разъясните пожалуйста!!!

...::: by GENEMI :::...

Номер выпуска : 4253
Возраст листа : 563 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/346349
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 15   2005-04-13 14:49:21 (#346349)

SQL.Two Data source in Grid

Unit Hello_World!;
uses Messages;

При переходе на SQL сервер FB возникла проблема с предстовлением
данных из двух наборов данных в одной таблице TDBGrid
запрос типа
SELECT Detail,Master from T_Detail,T_Master
Where Master_ID=ID
Выдает как и положено избыточные данные.Т.е. количество кортежей равно произведению
кортежей обеих таблиц.Мне же необходим вывод неизбыточных данных
Пробовал и внешние представления.В мануалах ничего не нашел.Стал уже думать об
использовании StringGrid.
На сегодняшний день программа работает с локальной базой данных из нескольких
Master формируется плоская Detail т.е. не поключевым полям а простой вставкой
значений Master, - в гриде через эдит выбирается нужный кордеж.Сейчас база нормализована
- думаю 3НФ.Хотелось бы сохранить удобство выборки нужного кортежа как сейчас
путем постепенного ввода предпологаемого значения.
Помогите чем могите прогу хотелось бы оттестить до конца месяца.Отчет типа.
IDE Delphi
СУБДД FireBird 1.5

С уважением Валерий
AKA votum
I use OpenOffice.org! D7/FB

Номер выпуска : 4333
Возраст листа : 569 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/349651
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-04-13 14:48:56 (#349651)

Локальная база данных

Здравствуйте.

Через некоторое время потребуется переводить программу с BDE на
какую-либо другую систему доступа к локальным базам.

В связи с этим хотелось бы понять, что использовать.
Требуется следующее:

1. поддержка SQL (точнее SELECT,INSERT,UPDATE,DELETE; управление
структурой базы средствами SQL не обязательно),
нужны составные индексы и транзакции
2. надежность
3. без инсталляции и хранения данных в реестре (программу
предполагается иногда запускать с флэшки)
4. легковесность (одна - две динамические библиотеки)
5. желательно, чтобы таблицы и индексы хранились в небольшом
количестве файлов; в идеале один - два
6. желательно Open Source (GPL, MPL или нечто подобное, допускающее
использование в коммерческих приложениях)

Идеально подошло бы использование MS Access через
ODBC или ADO, но требуется инстлляция.

Посоветуете что-нибудь?

Заранее спасибо.

Номер выпуска : 4274
Возраст листа : 565 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/347481
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 15   2005-04-13 13:03:53 (#347481)

Сортировка DBGrid

Доброго времени суток, все!

Имеется DBGrid на форме в Delphi 7. Необходимо организовать сортировку
по щелчку на заголовке этой таблицы (как в TViewList). Как это можно
сделать?

     ответов: 2   2005-04-13 06:33:17 (#349706)

Переносимое приложение

Hello comp!

С какими пераметрами в C++Builder5 нужно компилировать исходник, чтобы приложение
работало под Linux?

     ответов: 3   2005-04-12 21:12:37 (#346424)

Футкция - так?

...::: Приветствую, Всех :::...

Думаю, думаю, но логически понять так и не могу.
В итоге правильно получается что функция решает факториал так:

Index = 5
1) Result := Index*MulNumber(Index-1)
| | |
20 5 4
2) Result := Index*MulNumber(Index-1)
| | |
60 3 20
3) Result := Index*MulNumber(Index-1)
| | |
120 2 60
4) Result := Index*MulNumber(Index-1)
| | |
120 1 120
Только так я понял как она решает ( и понял зачем в конце стоит
Result:=1 ) факториал, но как цифры "скачут" в первом 1) не ясно.

Ведь если Result := Index*MulNumber(Index-1) то это с логической точки
зрения будет выглядеть так:

Result := Index * MulNumber(index-1)
| | | | | |
1) 0 <- 5 * 4 ( index-1 ) =4
2) 20 <- 4 * 3 ( index-1 ) =3
3) 12 <- 3 * 2 ( index-1 ) =2
4) 2 <- 2 * 1 ( index-1 ) =1


Но ведь эта какая-то ерунда!

Правильно ли я понял то как функция вызывает саму себя (рекурсия)?

index=5

...
? 5 ? 5-1
Result:=Index*MulNumber(index-1);
|
||
... ? ? ? 4-1
Result:=Index*MulNumber(index-1);
|
||
... ? ? ? 3-1
Result:=Index*MulNumber(index-1);
|
||
... ? ? ? 2-1
Result:=Index*MulNumber(index-1);
|
||
... ? ? ? 1-1
Result:=Index*MulNumber(index-1);

Если это правильно, то что происходит дальше?

...::: by GENEMI :::...

Номер выпуска : 4317
Возраст листа : 568 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/349122
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 3   2005-04-12 19:27:10 (#349122)

Легкий вопрос

...::: Приветствую, comp :::...

Я читаю книгу - Библия Delphi, пока я только на 4 главе и у
меня возникла путаница по этому поводу:

> Объекты очень удобная вещь. Он работает как шаблон, на основе которого
> создаются переменные типа объектов. Например:
> Начало программы.
> Переменные:
> Объект1 Кнопка;
> Объект2 Кнопка;
> Начало кода
> Объект1:= Кнопка.Создать объект
> Объект2:= Кнопка.Создать объект
> Объект1.Заголовок:=Привет
> Объект2.Заголовок:=Пока
> Объект1.Уничтожить объект.
> Объект2.Уничтожить объект.
> Конец кода

А как это будет выглядеть на языке Delphi.

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 4245
Возраст листа : 562 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/345737
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 3   2005-04-10 13:29:08 (#345737)

PChar

Можете объяснить что за тип PChar и как его использовать.
Только не пишите очень сложными фразами, я только пару дней как учу
Delphi :)

Номер выпуска : 4267
Возраст листа : 565 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/347123
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-04-08 08:48:44 (#347123)

bit битность?

...::: Приветствую, comp :::...

Можете объяснить что такое биты, восьмеричная, двоичная,
шестнадцатеричная.
Что такое 8-битный, 16-битный и 64-битный?

8 бит-1байт и 32-битный это одно и тоже?

Просто и процессор 32-битный и в программирование чего-то там битное -
как что все зачем это?

Запутался :(

= = = = = = = = = = = = = = = = = = = =
..::: by GENEMI :::...

Номер выпуска : 4252
Возраст листа : 563 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/346264
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-04-07 15:40:38 (#346264)

Re: bit битноть?

>Двоичная это когда есть только 0 и 1, шестнадцатиричная это от 0 до F.
>Шестнадцатиричная система очень удобна для компьютеров, так как достаточно
>два знака, чтобы указать байт. В десятичной системе пришлось указывать 3
>знака.

бит - ячейка к-рая может хранить 0 или 1,
байт = 8 бит.
что значит "достаточно два знака, чтобы указать байт. В десятичной системе пришлось
указывать 3 знака."?

Номер выпуска : 4258
Возраст листа : 564 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/346598
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-04-07 08:42:23 (#346598)

Re: вопрос по MFC

Hello Леонид,

Monday, April 4, 2005, 1:52:21 PM, you wrote:

ЛВ> 1. как программно изменить стиль диалога?
А зачем программно? Все стили задаются в редакторе диалогов.

ЛВ> 2. Можно ли менять стиль после создания окна (например, функцией ModifyStyle())?
ЛВ> когда изменения вступят в силу?
по идее можно, изменения вступают с силу сразу после вызова.
Возможно также, что на некоторые стили эта функция не влияет.

     ответов: 3   2005-04-05 21:58:05 (#344946)

Re: драйверы под Windows

> кто-нибудь из вас разрабатывал драйверы под винду?
>
Хорошо бы знать, какие именно. Драйвера разные бывают...

> интересовался этим вопросом?
> есть документация?
>
Если нет проблем с английским, лучше читать Windows DDK.
Документация в последних версиях хорошо написана.
Актуальных переводных книг на бумаге
я не видел (хотя и не искал).

Есть замечательная книга "Inside Windows 2000". Оригинал
на английском качал с http://anatolix.naumen.ru/ (~19M).
Можно начать с нее.

> ссылки?
>
http://www.microsoft.com/whdc/devtools/ddk/
http://www.osronline.com/

Номер выпуска : 4179
Возраст листа : 551 (дней)
Количество подписчиков : 529
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/339436
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 8   2005-04-05 09:15:46 (#339436)

Рисование на DirectX\OpenGL приложениях

Аллоха, All!
А я вот щас как сморожу очередную глупость:

Как осуществить рисование на DirectX\OpenGL канвасе другого
приложения?
Сейчас рисую так:
function DrawConnectionStatus: integer;
begin
ptaArray[0].PAnsiChar := @ConnectStatus;
ptaArray[0].n := lstrlen(ConnectStatus);

ptaArray[1].PAnsiChar := @TimeString;
ptaArray[1].n := lstrlen(TimeString);
DC := GetDC(0);
try
SetBkMode(DC, OPAQUE);
SetBkColor (DC, BkColor);
SetTextColor(DC, Color);
SetMyFont;
PolyTextOut(DC, ptaArray, 2);
Result := 1;
finally
ReleaseDC(0, DC);
end;
end;

все это дело крутиться по SetTimer-у
Но это сильно мерцает, т.к. рисует поверх всех программ и постоянно
перерисовывается этим самым приложением.
А как рисовать на самом канвасе?
Например так рисует FPS и т.п. прога 3DAnalyze (и на DirectX, и на
OpenGL), в нем, как я понял, используется какая-то hook dll.

     ответов: 2   2005-04-04 21:35:52 (#341759)

C++Builder

Hello comp!

Если загрузить начальную страницу с сайта, например
NMHTTP1->Get(http://yandex.ru/), фактически в "Body" будет загружен файл "index.html",
а по
умолчанию он сохраняется в файл Default.htm.
Как получить название файла, загружаемого методом NMHTTP1->Get(), а
затем присвоить это название Свойству "Body", чтобы файл сохранялся
под своим именем?

     ответов: 0   2005-04-04 21:10:57 (#345104)

C++Builder5

Hello comp!

Если загрузить начальную страницу с сайта, например
NMHTTP1->Get(http://yandex.ru/), фактически в "Body" будет загружен файл "index.html",
а по
умолчанию он сохраняется в файл Default.htm.
Как получить название файла, загружаемого методом NMHTTP1->Get(), а
затем присвоить это название Свойству "Body", чтобы файл сохранялся
под своим именем?

     ответов: 0   2005-04-04 19:29:43 (#345075)

Формат .MMO .EXP

Доброго дня!

Народ, подскажите что это за форматы и с чем их едят? Гугль ничего не
дал :(.

ЗЫ. Это одна фирмочка просит высылать им накладные в одном их этих форматов.

   Oleg Ponomarev   ответов: 0   2005-04-04 11:30:35 (#344756)

Поиск контуров

Привет всем!

Дискретная математика - это серьезно.

Вопрос в следующем: Каким образом можно осуществить subj в
неориентированном графе, да еще и с анализом смежности вершин.
Сейчас сделал пару элементарных примеров, для элементарных графов, но
только по поиску все возможных маршрутов (примеры в любой книжке по
Delphi есть:)).
И уперся рогом, если граф имеет достаточно большое количество вершин
каким образом можно сделать subj наиболее эффективно.
Так сказать не загружать слабые машины.
Покопался в нете, в голове не прояснилось. Хотелось бы конечно
какой-нибудь алгоритм.

   RASH   ответов: 3   2005-04-04 02:43:31 (#343254)

Разработка баз данных в *nix

Приветствую!
Предстоит перенести клиента на linux,раннее написанного на D.Планирую
смотреть в сторону QT.Логичнее и удобнее конечно смотреть в сторону
Kylix.Но поряду причин отподает. Сейчас хоть и появляется литература на
русском по QT,ноя невидел что бы там описывалась работа с базами данных.
Помогите ссылками на исходники,литературу,статьи,программы на тему базы
данных &QT.Какие средства разработки существуют QT& виндa.
Можно ли QT Designer обогатить визуальными DB виджетами и вообще можно
ли их самому разрабатывать.Какие средства используютя для формировании
отчетов.
Есть ли смысл приглядется к Tcl/Tk. Какие еще языки/среды используются
для дизайна интерфейса клиента базы данных.(Java пока не предлогать).
С уважением Валерий.
AKA votum

Номер выпуска : 4215
Возраст листа : 555 (дней)
Количество подписчиков : 526
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/341992
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 7   2005-04-01 21:45:28 (#341992)

погасить процесс

Приветствую!
Подскажите как программно погасить проссес.А потом заново его стартовать.

AKA votum

Номер выпуска : 4194
Возраст листа : 553 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/340515
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 14   2005-03-29 22:45:50 (#340515)

Вопрос

Здравствуйте, специалисты.

Я только делаю первые шаги в программировании. Не могу разобраться
как работать с маке файлами. Подскажите может где нибудь есть что скачать
по этому вопросу для просвещения.

   Виктор   ответов: 2   2005-03-29 20:07:56 (#339828)

3D на С или Delphi

Привет!

На чем лучше всего писать программу по 3D (Delphi, Borland C++ Builder, Turbo
C)? Может кто подскажет где можно взять литературу с хоть каким-то описанием,
как это все делать? (сколько искала в интернете, не смогла найти, может конечно
не так искала) Потому что просто даже не знаю с чего начинать ... :)

-***-
Best regards,
Galina mailto:SGal***@i*****.ru
21.03.2005 9:17

Номер выпуска : 4162
Возраст листа : 548 (дней)
Количество подписчиков : 529
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/337540
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 12   2005-03-28 22:49:04 (#337540)

excel vba магазин

Привет!

есть прайс-лист с ценами в Excel 2002
нужно сделать столбец выбора
например, чтобы юзер мог ставить галочку перед каждым товаром, затем
после нажатия кнопки "купить" должен создаваться список в отдельном
worksheet, куда бы копировались все строки, отмеченные галочкой или
плюсиком, причем так, чтобы этот список мог быть отправлен по почте
нажатием кнопки.

так вот, нужны ваши советы - как лучше все это сделать? Может есть
где-нибудь уже готовый пример? Использовать ли стандартные функции
экселя или нужен бейсик? Я так понимаю, нужно использовать формы и
функции рабоы со строками и текстом? Типа такого:

Buy.Onclick=SelectString
Selected.CopytoWorksheet

     ответов: 0   2005-03-28 21:50:45 (#341361)

Перехват команд модему

В программе желательно иметь возможность получать извещения о
посылаемых модему командах и его ответах (для отладки).
Может кто-нибудь посоветовать, как это сделать?

Для соединения использую RAS.
Windows 9x, 2000, XP.

Номер выпуска : 4202
Возраст листа : 554 (дней)
Количество подписчиков : 528
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/340967
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-28 12:47:22 (#340967)

Анализатор спектра

Здравствуйте!!!
Я столкнулся со следующей проблемой:
нужно промоделировать работу анализатора спектра (делаю это с
использованием OpenGL в VisualC++6.0), требуется проанализировать
спектр звука приходящего из другой программы. Никакой инфы по этой
теме в сети найти не получилось, может кто подкинет линки или
исходники...(сам понимаю вопрос из узкого круга, но может кто знающий
найдется ?)
И еще: каким образом можно определять и подсвечивать трехмерные
объекты на которые указывает курсор мыши?
Заранее благодарен.
--
Vovus mailto:vov***@n*****.ru
Origin: Язык до киллера доведет.

Номер выпуска : 4163
Возраст листа : 548 (дней)
Количество подписчиков : 529
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/337541
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-03-26 19:11:45 (#337541)

Delphi координаты ярлыка

Здравствуйте, Програмеры.

Как узнать координаты произвольного значка на рабочем столе?

     ответов: 6   2005-03-24 18:32:29 (#334178)

"засыпание" ноутбука и Delphi 3

Доброго дня!

Есть ноутбук, любящий постоянно "засыпать", WinXP и прога на Delphi 3.
Каким образом в проге сделать какие-либо действия перед тем, как чудо
техники "заснет"? Если можно кусочек кода :).

   Oleg Ponomarev   ответов: 2   2005-03-22 02:55:18 (#336386)

Win XP/Win 2000

Привет все программеры,

Вот такая вот проблема:
Написал программу, она делает:
1. Подключается к интернету через <Ras.h>
2. Отправляет письма (TNMSMTP - FastNet)
3. Принимает письма (TNMPOP3 - FastNet)
4. Отключаюсь (тот же <Ras.h>)

Писал и тестировал под WinXP без SP - всё Ok
На машине с Win2k с SP3 или SP4 проблема:
Первые два пункта - без проблем, а на 3-ем выдаётся ошибка, даже
если третий пункт закоментировать, то от интернета она категорически
отказывается отключаться -> что делать???

Афоризм напоследок: Как только нахожу ключ от успеха, кто-то меняет все замки.
Winamp глаголит: Ария - Баллада о древнерусском войне
21 марта 2005 г. 18:15:20

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4160
Возраст листа : 547 (дней)
Количество подписчиков : 529
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/337326
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-21 18:59:39 (#337326)

Delphi чтение текста WINAPI

> i:=SendMessage(h,WM_GETTEXTLENGTH,0,0);
> i:=GetWindowText(h, st, i);

Это всё правильно. Но: переведённая мною цитата из MSND - "приложения
посылают сообщение WM_GETTEXTLENGTH для определения длины текста,
ассоциированного с окном, в символах". Если окно является обычным окном, то
ассоциированным текстом является его заголовок, если стандартным контролом,
то им является текст в этом окне, в зависимости от типа контрола: кнопки
возвращают текст на себе (OK или Cancel, например), списки возвращают текст
"подсвеченно" элемента итп. То же относится и к функции GetWindowText().
Описанная тобой ситуация похожа на то, что у тебя собственные, созданные
тобой дочерние окна, которые обслуживаются не ОС, а твоим приложением, и при

этом не имеющие заголовков. Если ты намеревался таким образом получить
текст, отображаемый в окне, как например отображает набранный в документе
текст MS Word, то вынужден огорчить: ничего не получится. ОС не запоминает,
что приложение рисует в своём окне. Этот текст НЕ СТАНОВИТСЯ ассоциированным

с окном, хотя бы потому, что там кроме текста могут быть ещё и изображения.
Вместо этого она посылает приложению сообщение о необходимости перерисовать
такое-то окно (WM_PAINT), и приложение само должно это сделать. Это сделано
из соображений экономии системных ресурсов: проще приложению сохранять
состояние своего окна наиэкономнейшим способом (например, программист может
просто запоминать текст в массиве строк, чтобы по запросу вновь его
перерисовать какими-нибудь DrawText()-ами), вместо того чтобы ОС запоминала
целый битовый образ окна, временно "затираемого" другими окнами. Это ещё и
быстрее на порядок будет, если программист не ламер последний, конечно. Это
всё азбука Windows-программирования, но если ты используешь что-нибудь типа
VCL, то ты вполне может этого и не знать, ибо эта библиотека сама заботится
обо всех подобных нюансах (точнее, заботятся её канвы - Canvas), если только

ты явно не программируешь иным образом.
Чтобы решить эту проблему, тебе нужно будет или самому обрабатывать
сообщения WM_GETTEXTLENGTH и WM_GETTEXT в своих дочерних окнах, или
использовать собственные сообщения, из разряда WM_USER, что лучше, ибо в
этом случае они не будут пересекаться со стандартными WM_GETTEXTLENGTH и
WM_GETTEXT, предназначенными вообще-то для других и вполне определённых
целей.
Кстати, "по настояшему" профессиональные программисты на Builder-е и Delphi
редко используют канвы на полную катушку из сображений экономии системных
ресурсов. Канва ведь всё равно в общем случае не может сохранить свой
констекст иначе, как битовое изображение. Представь, если MS Word будет
сохранять 200-страничный документ в виде Bitmap-а, да ещё с "принтерным"
разрешением 600 dpi, а не 96 или 120, как на большинстве мониторов.

--
С уважением, boroda
mailto:boroden***@s*****.ru

Номер выпуска : 4138
Возраст листа : 540 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/332780
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Шматко А.А.   ответов: 8   2005-03-20 21:42:30 (#332780)

Builder C

Привет программеры,

Такая вот проблема:
1. Написал программу на Delphi - запускаю на другой машине (только ОС и
драйвера) => работает
2. Написал программу на Builder C - запускаю там же, а она требует:
* borlndmm.dll
* cc3260.dll
* cc3260mt.dll
Даже простая консольная программа на чистом C (без всяких классов,
AnsiString и т.п.) весом в 9kb без cc3260.dll (1.34Mb) не работает

Есть ли решение этой проблемы, кроме создание инсталяшек своих
программ???

Афоризм напоследок: Нелегко обрести друга. Еще труднее потерять врага.
Winamp глаголит: Трофим - 08 Снегири
17 марта 2005 г. 12:09:03

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4149
Возраст листа : 543 (дней)
Количество подписчиков : 526
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/334898
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-03-17 18:52:04 (#334898)

Работа с принтером. DELPHI 7.

Привет, ALL!
У меня вот такая проблемка выскочила.
Мне нужно, что бы моя программа могла распечатать рисунок хранящийся в
Tbitmap.
Для этого я пробовал использовать модуль PRINTERS, но у меня нечего не
получается.
--
Вот если просто что ни будь такое сделать . . .
var
p:Tprinter;
begin
....
With p do
begin
BeginDoc;
Canvas.Font:=label1.font;
Canvas.TextOut(100,100,'Это тест принтера !!!');
endDoc;
end;
end;
то работает. А вот если я просто что - ни будь пытаюсь на эту канаву
скопировать (и с помощью Draw пробовал делать и с помощью BitBlt) то принтер
выкидывает чистый лист.
--
Как мне сделать всё по нормальному?

Номер выпуска : 4143
Возраст листа : 542 (дней)
Количество подписчиков : 526
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/334125
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-16 19:03:01 (#334125)

FoxPro: rак удалить файл таблицы с жёсткого диска?

Добрый день!
В общем-то всё описано в теме.

С уважением, Бурляев Вячеслав

Номер выпуска : 4136
Возраст листа : 540 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/332575
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-03-16 09:13:46 (#332575)

Delphi чтение текста WINAPI

Здравствуйте, Програмеры.

Надо прочитать текст из дочернего окна пробовал разные варианты, но получал
st(PChar) = nil a i=0;

i:=SendMessage(h,WM_GETTEXTLENGTH,0,0);
i:=GetWindowText(h, st, i);

Подскажите как лучше осуществить чтение.
Заранее спасибо.

     ответов: 4   2005-03-14 17:51:14 (#332051)

Re: как спрятать заголовок окна из панели задач?

Здравствуйте !

> у меня есть приложение, надо спрятать заголовок из панели задач, но
> чтобы само окно не скрывалось.
> чего посоветуете? надо написать на WinAPI или MFC.

Есть простой способ - установить главному окну расширенный стиль
WS_EX_TOOLWINDOW. Правда, заголовок станет тоньше.

--
С уважением, Вахтуров Виктор.

Номер выпуска : 4113
Возраст листа : 531 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/327478
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-03-10 00:05:49 (#327478)

If you please, help me!

гДПЮЯРБСИРЕ !
оПНЦПЮЛХПСЧ ДКЪЪ ЯЕАЪЪ МЮ VB5.
яРНКЙМСКЯЪЪ Я РЮЙНИ ОПНАКЕЛНИ.
хГ ОПНЦПЮЛЛШ ДНГБЮМХБЮЧЯЭ Б НТХЯ Й СДЮКЕММНИ ЛЮЬХМШ Я ОНЛНЫЭЧ MSCOMM,
РЮЛ ЯЕРЭ Я POP3 Х SMTP ЯЕПБЕПЮЛХ. рЮЛ ЛНИ ЮЙЙЮСМР. мЮ СДЮКЕММНИ ЛЮЬХМЕ ГЮОСЯЙЮЧ
Telnet ОНДЯНЕДХМЪЪЧЯЭ Й ЯЕПБЕПЮЛ. нРОПЮБКЪЪЧ ОНВРС АЕГ ОПНАКЕЛ. оНКСВЮЧ ОНВРС
text Х html АЕГ ОПНАКЕЛ, ДБНХВМШЕ ТЮИКШ ГЮЙНДХПНБЮМШ UU - ПЮЯЙНДХПСЧ ЯРНПНММЕИ
ОПНЦПЮЛЛНИ. оНВРНБШЕ ТЮИКШ ЯНУПЮМЪЪЧ ЙЮЙ *.eml ГЮРЕЛ ВХРЮЧ Х УПЮМЧ Б OtlookExpress.
оН РЮЙНИ ФЕ ЯУЕЛЕ ВЕПЕГ СДЮКЕММСЧ ЛЮЬХМС (С ЛЮЬХМШ БШУНД Б Internet) ОНДЯНЕДХМЪЪЧЯЭ
Й WWW ЯЕПБЕПЮЛ. яРПЮМХВЙХ ЯПЮГС ЯНУПЮМЪЪЧ Х НРЙПШБЮЧ Б ЯБНЕИ ОПНЦПЮЛЛЕ Я ОНЛНЫЭЧ
Internet control. оПНАКЕЛЮ Б РНЛ ВРН ДБНХВМШЕ ТЮИКШ Я WWW Х FTP МЕ ЛНЦС ЯНУПЮМХРЭ.
нМХ ЯЙЮВХБЮЧРЯЪЪ МН МЕЛНЦСР НРЙПШРЯЪЪ. хЯОНПВЕМ ТНПЛЮР.
лНДЕЛ ПЮАНРЮЕР Б РЕЙЯРНБНЛ ПЕФХЛЕ. дЮММШЕ ЯМЮВЮКН ГЮЦПСФЮЧ ЯРПНЙС. оПХЛЕП;
dim s as string,b() as byte
s=s+Mscomm1.Input
bm()=s ХКХ bm()=ctrconv(s,vbFromUnicode)
Open "D:\1.jpg" For Binary Access Write As #1
Put #1, , bm()
Close #1
"D:\1.jpg" - ПЮГЛЕП ТЮИКЮ ЙЮЙ Б ГЮЦНКНБЙЕ ЯРПЮМХВЙХ, МН НМ МЕ НРЙПШБЮЕРЯЪЪ
оЕПЕБНФС ЛНДЕЛ Б binary, МЕ ОНКСВЮЕРЯЪЪ ЙНЛЮМДЮ
b()=b()+Mscomm1.Input - МЕГМЮЧ ЙЮЙ МЮПЮЫХБЮРЭ ДХМ. ЛЮЯЯХБ
йРН ГЮМХЛЮКЯЪЪ ГЮЦПСГЙНИ ДБНХВМШУ ТЮИКНБ Я WWW ВЕПЕГ telnet ЛНФЕР ОНЛНФЕРЕ ?

Alexey.
zac***@s*****.kz ХКХ ЯЙНПН ЯЕПБЕП ОНЛЕМЪЪЕР ХЛЪЪ МЮ zac***@2*****.kz

Номер выпуска : 4130
Возраст листа : 535 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/330141
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-09 20:58:47 (#330141)

Global hook

Доброго времени суток, все!

Как на Delphi 7 поставить хук на системные события? Т.е. происходит
что-то в системе - я об этом узнаю первым. Интересуют прежде всего
системные ошибки. Заранее спасибо.

     ответов: 4   2005-03-09 20:58:33 (#325362)

Protection in component

Здравствуйте!
Все девушек с праздником! Остовайтесь молодыми!
*******************************************************************
Вот, вчерась накропал -смотрите в атаче.
Собственно это компонент регистрирующий запуски программы в реестре .
количество запусков устанавливается в инспекторе объектов. тамже можно
задать message и ключи реестра. Не реализовано получение
userID. Хотелось чтобы он формировался в файл в виде перемешанных знаков
на основе первичных данных.Вот как перемешать чтобы потом это можно было
у себя расшифровать пока не ясно.
С благодарностью приму любые советы
С уважением Валерий.

Номер выпуска : 4127
Возраст листа : 534 (дней)
Количество подписчиков : 521
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/329466
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-08 18:33:11 (#329466)

Длинная арифметика (массивы)

ВрЕМеЧк0 д0бРеНьк0е, comp,

Здесь типы данных и основные процедуры(функции)

const Nmax=10000;
Osn=1000;
type mas=array[0..Nmax]of integer;

var Operand1:mas;

procedure InitOperand(var A:mas;s:string);
var j,i:integer;
begin
A[0]:=1;
for j:=1 to length(s) do
begin
for i:=A[0] downto 1 do
begin
A[i+1]:=A[i+1]+(longint(A[i])*10) div Osn;
A[i]:=(longint(A[i])*10) mod Osn;
end;
A[1]:=A[1]+(ord(s[j])-ord('0'));
if A[A[0]+1]>0 then inc(A[0]);
end;
end;

procedure PrintOperand(A:mas;var st:string);
var s,ls:string;
i:integer;
begin
ls:=inttostr(Osn div 10);
st:=inttostr(A[A[0]]);
for i:=A[0]-1 downto 1 do
begin
s:=inttostr(A[i]);
while length(s)<length(ls) do s:='0'+s;
st:=st+s;
end;
end;

procedure AddOperands(A,B:mas;var C:mas); {сложение}
var i,k:integer;
begin
FillChar(C,SizeOf(C),0);
if A[0]>B[0] then k:=A[0]
else k:=B[0];
for i:=1 to k do
begin
C[i+1]:=longint(C[i]+B[i]+A[i]) div Osn;
C[i]:=longint(C[i]+B[i]+A[i]) mod Osn;
end;
if C[k+1]=0 then C[0]:=k
else C[0]:=k+1;
end;

procedure SubOperands(A,B:mas;var C:mas); {вычитание}
var i,j,Sp:integer;
begin
Sp:=0;
for i:=1 to B[0] do
begin
dec(A[i+Sp],B[i]);
j:=i;
while (j<=A[0])and(A[j+Sp]<0) do
begin
inc(A[j+Sp],Osn);
dec(A[j+Sp+1]);
inc(j);
end;
end;
i:=A[0];
while (i>1)and(A[i]=0) do dec(i);
A[0]:=i;
for i:=0 to A[0] do C[i]:=A[i];
end;

procedure MulOperands(A,B:mas;var C:mas);{умножение}
var i,j:integer;
dv:longint;
begin
FillChar(C,sizeof(C),0);
for i:=1 to A[0] do
for j:=1 to B[0] do
begin
dv:=longint(A[i]*B[j]+C[i+j-1]);
inc(C[i+j],dv div Osn);
C[i+j-1]:=dv mod Osn;
end;
C[0]:=A[0]+B[0];
While (C[0]>1) and (C[C[0]]=0) do dec (C[0]);
end;

function MoreOperand(A,B:mas;sdvig:integer):byte;{сравнение, 0=(A>B),
1=(A<B), 2=(A=B) с учётом сдвига}
var i:integer;
begin
if A[0]>(B[0]+sdvig) then MoreOperand:=0
else if A[0]<(B[0]+sdvig) then MoreOperand:=1
else
begin
i:=A[0];
while (i>sdvig) and (A[i]=B[i-sdvig]) do dec(i);
if i=sdvig then
begin
MoreOperand:=0;
for i:=1 to sdvig do
if A[i]>0 then exit;
MoreOperand:=2;
end
else MoreOperand:=byte(A[i]<B[i-sdvig]);
end;
end;

procedure Sub(var A:mas;B:mas;Sp:integer);(вычитание с учётом сдвига)
var i,j:integer;
begin
for i:=1 to B[0] do
begin
dec(A[i+Sp],B[i]);
j:=i;
while (j<=A[0])and(A[j+Sp]<0) do
begin
inc(A[j+Sp],Osn);
dec(A[j+Sp+1]);
inc(j);
end;
end;
i:=A[0];
while (i>1)and(A[i]=0) do dec(i);
A[0]:=i;
end;

procedure Mul(A:mas;K:longint;var C:mas); (умножение длинного на
короткое)
var i:integer;
begin
FillChar(C,sizeof(C),0);
if k=0 then inc(C[0])
else
begin
for i:=1 to A[0] do
begin
C[i+1]:=(longint(A[i])*K+C[i]) div Osn;
C[i]:=(longint(A[i])*K+C[i]) mod Osn;
end;
if C[A[0]+1]>0 then C[0]:=A[0]+1
else C[0]:=A[0];
end;
end;

function FindBin(var D:mas;const B:mas;Sp:integer):longint;
var down,up:word;
E:mas;
begin
down:=0; up:=osn;
while up-1>down do
begin
mul(B,(up+down) div 2,E);
case MoreOperand(D,E,Sp) of
0: down:=(down+up) div 2;
1: up:=(up+down) div 2;
2: begin up:=(up+down) div 2; down:=up; end;
end;
end;
mul(B,(up+down) div 2,E);
if MoreOperand(D,E,0)=0 then sub(D,E,Sp)
else
begin
sub(E,D,Sp);
D:=E;
end;
FindBin:=(up+down) div 2;
end;

procedure MakeDel(A,B:mas;var C,D:mas); {деление с-целая часть,
d-остаток}
var Sp:integer;
begin
D:=A; Sp:=A[0]-B[0];
if MoreOperand(A,B,Sp)=1 then dec(Sp);
C[0]:=Sp+1;
while Sp>=0 do
begin
C[Sp+1]:=FindBin(D,B,Sp);
dec(Sp);
end;
end;

procedure DivOperands(A,B:mas;var C:mas); (DIV)
var D:mas;
begin
fillchar(C,sizeof(C),0);
C[0]:=1;
fillchar(D,sizeof(D),0);
D[0]:=1;
case MoreOperand(A,B,0) of
0: MakeDel(A,B,C,D);
1: D:=A;
2: C[1]:=1;
end;
end;

procedure ModOperands(A,B:mas;var D:mas); {MOD}
var C:mas;
begin
fillchar(C,sizeof(C),0);
C[0]:=1;
fillchar(D,sizeof(D),0);
D[0]:=1;
case MoreOperand(A,B,0) of
0: MakeDel(A,B,C,D);
1: D:=A;
2: C[1]:=1;
end;
end;

скажем СПАСИБО Окулову С.М. за отличные лекции. :)

     ответов: 0   2005-03-06 21:09:50 (#328583)

Re: Программирование на Pascal. Функция MOD и TRUNC для типа данных extended

Hello Максим,

Sunday, February 27, 2005, 4:01:34 PM, you wrote:

М> Здравствуйте,
М> Я проектирую свою криптосистему и у меня возникла острая необходимость
М> в нахождении остатка от деления для очень больших чисел. Я пытался сам
М> написать функцию нахождения остатка от деления но среда постоянно
М> выдает ошибку переполнения или некорректной операции с плавающей
М> точкой. Помогите пожалуйста.

А что значит, "очень больших"? Можно примерчик привести? Просто, я
как-то раз писал функцию сложения многоразрядных целых чисел (подойдет для
любого количества разрядов), где сами операнды (числа) имели строковое
представление. То есть, складывал, к примеру, не 123 с 456, а '123' c
'456'. Правда, не очень быстро оно считалось. Думаю, здесь тоже можно
что-то в этом роде сделать.

   Вадим Шешунов   ответов: 23   2005-03-06 21:09:16 (#324151)

Coco/R, NQC

Привет All,

Если кто знает расширения файлов для форматов Coco/R и NQC?
Типа Pascal - pas, C - c или cpp.
Надо для своего текстового редактора.

Афоризм напоследок: Сто грамм, конечно, могут быть лишними, но они никогда не
помешают.
Winamp глаголит: Scorpions - Living For Tomorrow
5 марта 2005 г. 14:20:21

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4123
Возраст листа : 531 (дней)
Количество подписчиков : 522
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/328008
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-03-05 20:01:45 (#328008)

Перемещение чисел массива в файле

>Как переместить четные числа в начало, а нечетные в конец не изменяя
>порядка следования чисел с одинаковой четностью.

Пример на C++:

inline bool sorter(int x, int y)
{
return x%2 < y%2; // operator% означает остаток от деления
}
/* skipнуто */
std::stable_sort(array.begin(), array.end(), sorter);

Вообще, для C++ в стандартной библиотеке (STL) есть столько всего, что я с
Delphi практически завязал. Что, впрочем, не удивительно: Delphi не является
языком, для которого издают международные станданты (ISO), к сожалению. Для
Delphi могу предложить только "ручное" решение. Например, метод "пузырька",
где в качестве критерия сравнения выступает выражение
x MOD 2 < y MOD 2
Метод пузырька является "стабильным", то есть сохраняет относительный
порядок сортируемых элементов. Надеюсь, прочитать файл в массив и сбросить
результаты в файл, не проблема? Иначе можно воспользоваться методом
"вставки" - заводишь два списка и, последовательно читая файл, помещаешь
очередное прочитанное число в зависимости от его чётности в один из двух
списков. А затем оба списка последовательно выводятся в файл. Пример
опять-таки на C++:

std::list<int> odd, even;

inline void adder(int x)
{
(x%2==0 ? even : odd).push_back(x);
}
/* skipнуто */
std::for_each(std::istream_iterator<int>(std::cin),
std::istream_iterator<int>(), adder);
std::copy(even.begin(), even.end(), std::ostream_iterator<int>(std::cout, "
"));
std::copy(odd.begin(), odd.end(), std::ostream_iterator<int>(std::cout, "
"));

Примеры вполне работоспособны. Разве что заменить std::cin и std::cout на
что-нибудь другое.

--
С уважением, boroda
mailto:boroden***@s*****.ru

Номер выпуска : 4120
Возраст листа : 531 (дней)
Количество подписчиков : 522
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/327980
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Шматко А.А.   ответов: 0   2005-03-05 19:10:37 (#327980)

Re[2]: Перемещение чисел массива в файле

Hello Вадим,

Saturday, March 5, 2005, 1:20:07 AM, you wrote:

ВШ> Hello Gift,

ВШ> Friday, March 4, 2005, 4:59:01 PM, you wrote:

G>> Как переместить четные числа в начало, а нечетные в конец не изменяя порядка

G>> следования чисел с одинаковой четностью.
G>> есть
G>> 12 7 9 6 -5 -6
G>> 4 6 -7 23 -24 9

G>> надо
G>> 12 6 -6 7 9 -5
G>> 4 6 -24 -7 23 9

G>> uses crt;
G>> const n=9;
G>> type mas=array[1..6] of integer;
G>> var
G>> f:file of mas;
G>> i,x,min,max,num_of_max:integer;
G>> a:mas;
G>> begin
G>> clrscr;
G>> randomize;
G>> assign(f,'000.000');
G>> rewrite(f);
G>> for i:=1 to n do
G>> begin
G>> for x:=1 to n do
G>> begin
G>> a[x]:=random(99);
G>> write(a[x]:3);
G>> end;
G>> writeln;
G>> write(f,a);
G>> writeln;
G>> end;
G>> close(f);

Упс..... Поправлю сам себя:
1. Просмотреть массив слева направо и найти первый нечетный элемент -
запомнить его индекс -- переменная р.
ВШ> 1а. Короче говоря, массив нужно просматривать с конца (справо налево). Если
текущий
ВШ> элемент четен, то,
ВШ> 2. Запомнить его значение.
ВШ> 3. Все элементы слева от него до индекса р сдвинуть вправо на один элемент.
ВШ> 3. Запомненное значение записать в р-й элемент.
4. Увеличить р на 1.
5. Повторять с п.1а до тех пор, пока р меньше количества элементов
массива.

   Вадим Шешунов   ответов: 1   2005-03-05 19:08:59 (#327789)

FoxPro: запрос с несколькими переменными в WHERE

Добрый день!

Ситуация такова:
Допусти есть массив значений VALUES(N) (N в разных случаях может быть различным)
Необходимо выбрать информацию из таблицы TABLE для всех этих значений, хранящихся
в поле FIELED.
То есть мне нужно сформировать строку запроса типа:
SELECT * FROM table WHERE FIELD=value(1) OR FIELD=value(2) OR ..... OR FIELD=value(N)

Думал использовать сформиовать строку запроса:
textquery="SELECT * FROM table WHERE "
for i=1 to n
if i>1
existor="OR "
endif
textquery=textquery+existor+"FIELD=value(i) "
endfor

а затем эту строку выполнить с помощью функции SQLEXEC(), но для SQLEXEC() требуется
знать идентификатор соединения, а что писать в параметрах функции SQLCOMMIT()
для получения соединения - не знаю. В одной книге в описании этой функции нашёл,
что может быть один или три параметра, а каких не написано.

В общем, я в тупике. Прошу помочь.

С уважением, Бурляев Вячеслав

Номер выпуска : 4102
Возраст листа : 529 (дней)
Количество подписчиков : 525
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/326318
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-03-05 19:08:29 (#326318)

Есть такая WSH

Здравствуйте, comp.

Есть интепретатор программа 1С:Предприятие :)

Например такой VBS макрос запускает 1С

Dim v7
Set v7 = CreateObject("V77.Application")
Запускаем
result = v7.Initialize(v7.RMTrade, "/DE:\anton1C\_MDDorab\ДОРАБ\Погорелов /UC:\Temp
/NАдминов", "")
И вызываем глобальную функцию
result = v7.EvalExpr("ОЛЕ()")

Вопрос как подключится к уже запущенному процессу? Один товарищ послал
на такое слово как DCOM ... Роюсь, только жаль времени не хватает.

Заранее спасибо.

   Антон Горячун   ответов: 8   2005-03-04 13:02:45 (#322102)

Обработка нажатия нескольких клавиш...

> И нужно обрабатывать нажатия 2-х клавиш одновременно...
> Помнится, где-то видел реализацию через DirectInput ...

DirectInpit - неплохое решение, но не единственное. WinAPI тоже неплох -
сообщения WM_KEYDOWN, WN_KEYUP, WM_SYSKEYDOWN, WN_SYSKEYUP. На худой конец
WM_CHAR и WM_SYSCHAR, хотя это и не очень подходит для игр. Однако,
DirectInput в отличие от WinAPI обеспечивает меньшую задержку (latency -
латентность) между собственно действиями пользователя и приходом сообщений к

программе, но если речь не идёт о миллисекундах, но это не страшно. Примеры
приводить не буду, ибо их в Sample-ах самого Delphi достаточно.

--
С уважением, boroda
mailto:boroden***@s*****.ru

Номер выпуска : 4106
Возраст листа : 529 (дней)
Количество подписчиков : 525
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/326772
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   Шматко А.А.   ответов: 0   2005-03-03 20:14:51 (#326772)

Проблемы с BDE для DBF

Такая ситуация.
Есть таблица 'Proto.dbf'. Доступ к ней реализован через TTable.
Время от времени при запуске программы 'Proto.dbf'
чистится оператором 'DELETE FROM ... WHERE'.
Если перед выполнением оператора не закрыть TTable, то
даже если не удалено ни одной записи, при вызове
TTable.Refresh программа разваливается с
тысячами Access Violation.
Эффект возник при переходе с Paradox на Dbf.
Версия BDE 5.01.

Всвязи с этим два вопроса:
1. это глюк или где-то в документации открытым текстом сказано,
что BDE не может обеспечить безопасный доступ к
таблице одновременно из TTable и TQuery
2. распространяет ли Borland отладочную информацию для BDE,
как это делает MS для своих продуктов, например

Номер выпуска : 4088
Возраст листа : 528 (дней)
Количество подписчиков : 527
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/325795
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 4   2005-03-03 13:56:41 (#325795)

OpenGL - разгон

Привет All programmers,

Как разогнать OpenGL?
То бишь есть небольшое приложение по OpenGL (крестики-нолики), где
крестики и нолики представляют из себя 3D модели, которые вращаются
вокруг оси. Когда их становится больше 10 (поле 30х30), то FPS
падает с 60 до 10, а то и меньше. Есть предположение, что OpenGL
всё отрисовывает Software...

Вопрос: как (возможно опция какая-нибудь) разогнать OpenGL, чтобы
так не падала скорость? Игрушки и с большим количеством граней
работают быстрее...

Афоризм напоследок: Наивность - это редкий дар смотреть на мир невооруженным
взглядом.
Winamp глаголит: Stratovarius - Stratosphere
14 февраля 2005 г. 21:58:30

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4031
Возраст листа : 512 (дней)
Количество подписчиков : 522
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/316216
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 18   2005-03-02 20:22:58 (#316216)

Re: OpenGL - разгон

> Ты читал, КАКИЕ у него fps?
Не-а. Не застал. Я ж в начале предупредил, что не с начала читал. А что, там

падение более, чем в 10 раз?
3DMark05 на 8-и пакетных очередях мне показывал 4,3 fps, а на 32768-и
пакетных - 56,7 fps. Это в 1024х768. Catalist 4.7 или 4.8, точно не помню.

   Шматко А.А.   ответов: 1   2005-03-02 20:22:37 (#325372)

Обработка нажатия нескольких клавиш...

Всем, Привет!!!

Собственно все уже и сказано.. :)
Просто нужно реализовать игру, на двоих... И нужно обрабатывать нажатия 2-х
клавиш одновременно... Пишется все на Делфи, но это не столь важно.
Помнится, где-то видел реализацию через DirectInput ... Но я не могу ее
найти :(, да и проще хочется придумать...

Что посоветуете?

     ответов: 1   2005-03-02 17:08:45 (#325360)

Re: ICQ Spam System

> Пишу прогу для организайии мультиюзер чата под ICQ, но сабж считает сообщения
> многим пользователям как спам и отключает мой УИН от сервера...
>
> При последующем подключении сообщения вообще никуда не приходят :(
> Т.е. послать сообщений получаеться шде-то 15 штук и все :(
> Как обойти - мож кто знает???
>
Вряд ли это удастся, поскольку права на управление ограничениями
сервера, естественно, Вы не получите, даже если станут
известны форматы соответствующих пакетов.
Остается реализовывать чат штатными средствами,
тем более что это логичнее всего.
К сожалению, чат в ICQ, насколько я помню, требует установки
прямого соединения. Изменилось ли что-то всвязи с
появлением Xtraz, мне не известно. Если Вы за http proxy,
прямое соедиинение невозможно.
Если не обязательно использовать ICQ, можно воспользоваться
другими протоколами. Например, AIM. Протокол почти тот
же, что ICQ 7,8,..., зато средства организации чата
встроенные. Правда, я не пробовал ими воспользоваться :(

Номер выпуска : 4068
Возраст листа : 525 (дней)
Количество подписчиков : 529
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/323613
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-02-27 12:52:08 (#323613)

Делфи: JPEG в BMP

Здравствуйте, Програмеры.

Как конвертировать JPEG в BMP ?

     ответов: 1   2005-02-25 21:38:04 (#322805)

phpbb

Доброго времени суток, все!

Кто-нибудь пользовался веб-форумом phpbb? На localhost`е он нормально
загружается, работает, а стоит положить на сервер (holm) - при
выполнении возникает ошибка 500 (внутренняя ошибка сервера).

     ответов: 3   2005-02-22 00:21:54 (#320697)

Delphi TImege

Здравствуйте, Програмеры.

Как правильно скопировать часть изображения из TImege?
Приемник типа TImege или TPaintBox.

     ответов: 4   2005-02-19 23:07:07 (#318899)

Re: Intel C++ Compiler

Приветствую вас, Sh0Ck_filE!

17.02.2005 21:12 вы писали:

> Недавно услышал, что интеловский компилятор бесплатен для некоммерческих
> проектов.

Только версия под Linux.

> Хотелось бы узнать у рсдн-комьюнити -- правда ли это?
> И ещё один небольшой вопросец. Интеловый компилятор доступен триально на
> месяц -- нужно скачать 130 мегабайтов...

Сколько-сколько? Это какая версия? Насколько я помню, столько весит
Intel Fortran compiler (с аналогичными условиями лицензирования,
кажется), но не ICC.

> на мыло приходит серийник и
> лицензия на 1 месяц. Можно ли раз в месяц просто получать лицензию и новый

> серийник? Может быть это и есть та самая пресловутая бесплатность для
> некоммерции, о которой я спросил чуть выше?

Очевидно, нет. Триал, он триал и есть.

     ответов: 1   2005-02-18 20:14:48 (#318891)

Delphi NMPOP31

Здравствуйте, Програмеры.

при чтении письма метод:
Edit5.Text:=NMPOP31.MailMessage.Subject;
возвращает =?Windows-1251?B?z/Du4eA=?=
Как это перевести в читаемый вид?

     ответов: 0   2005-02-16 17:32:17 (#317264)

TWebbrowser

Здравствуйте.
Помогите пожалуйста.
Delphi 7, проблема такая: использую TWebbrowser, загружаю страницу, на которой
несколько таблиц, в некоторых таблицах есть ссылки. Необходимо извлечь в Memo
текст из таблиц и соотв. ему линк (если он есть).
И как проверить имеет ли текст в ячейке ссылку?
Как извлечь весь текст из таблиц, я знаю, но линки не получается.

С уважением,
Алексей.

Номер выпуска : 4028
Возраст листа : 512 (дней)
Количество подписчиков : 522
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/316109
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   "Alex"   ответов: 3   2005-02-15 22:14:02 (#316109)

Delphi TListView

Здравствуйте, Програмеры.

Подскажите, можно ли заставить TListView отоброжать элементы в стиле
"Плитка" как в папках ХР?

     ответов: 3   2005-02-14 22:37:24 (#315541)

Protection of the software

Здравствуйте all!
Подскажите как наименьшими силами защитить программу, Хотелось бы чтобы
чтобы пользователь не имел возможности по дружбе или ротозейству
передать ее
другому для анологичного использования!
Пока в голове одна идея что бы прога при запуске проверяла чтонибудь в
реестре, И если не находит там нужное просто не запускалась.
С уважением
Валера.

Номер выпуска : 4017
Возраст листа : 508 (дней)
Количество подписчиков : 523
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/313429
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 6   2005-02-13 00:30:08 (#313429)

MFC CSizingTabCtrlBar странные вещи...

Hello comp,
на codeproject.com скачал пример:

http://www.codeproject.com/docking/sizing_tabctl.asp

там такая штука типа Workspace в VC6. Все работает, если в качестве
вида используется CTreeView. Но стоит только заменить CTreeView на
CListView, как сразу исчезает прорисовка по перелючению закладок.
Точнее, она происходит, но сам TabCtrl почему-то затирает все своим
серым фоном.
Почему два близких класса ведут себя так по-разному? В исходном коде
sizing_tabctrl никаких привязок к конкретному классу именно
CTreeView нет!

     ответов: 0   2005-02-11 22:19:16 (#314788)

E-mail - InDy

Привет comp,

Писал приложение на Delphi 6 с отправкой письма с вложением.
Использовал компоненты FastNet
После перехода на Delphi 7 - :( - эти компоненты исчезли
Так вот. Подскажите нормальную документацию на русском по InDy
компанентам или какой-нибудь компанент, использующий SMTP и POP3 для
приема-отправки писем с вложениями.
В JEDI что-то есть такое непонятное - неясное.

Афоризм напоследок: Вирус отличается от антивирус тем, что распространяется бесплатно.
Winamp глаголит: ППК - Robots Outro
8 февраля 2005 г. 19:01:16

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 4019
Возраст листа : 508 (дней)
Количество подписчиков : 522
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/313767
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-02-10 13:47:47 (#313767)

печать jpeg из делфи 3

Доброго дня!
Каким образом распечатать jpeg файл из делфи с хорошим качеством
(например так как печатает ACDsee) ? Если можно, примерчик напишите :).

   Oleg Ponomarev   ответов: 0   2005-02-09 20:42:42 (#313267)

Re[3]: [Delphi or CppBuilder] Административное оповещение

Привет monah,

Sunday, February 6, 2005, 12:12:43 PM, ты писал:

m> Здравствуйте, Eugene.

EtM>> Отправляй E-mail - просто, эффективно и дойдет до адресата, даже если
EtM>> он уехал на 2 недели.

m> Как вариант, поставить у админа mail сервер типа Courier Mail Server

поставил почтовый сервер OMS 0.8.10
прикольная вещь обьединяет в себе SMTP, POP3 серверы.
отправка письмом дала все ожидаемые результаты - как сам не догадался.

вобщем спасибо.

   "Oleg N. Knish"   ответов: 0   2005-02-08 00:08:06 (#312212)

Delphi Жлущий режим

Здравствуйте, Програмеры.

Подскажите, как вывести компютер из ждущего режима програмным методом.

     ответов: 14   2005-02-07 10:32:02 (#307513)

[Delphi or CppBuilder] Административное оповещение

Привет comp.
Вобщем пишу программку которая мониторит на нескольких машинах
фалы и если чтото не так как должно быть отправляет
сообщение администратору через установленый мессагер.

Теперь проблема
Как можно отправить САБЖ средствами ОС чтоьы сообщение дошло к
админу даже если его сейчас нет а появится он через пару недель (на
подобие того как Виндоус радует сообщениями о крахе системы).

Как это можно реализовать.

   "Oleg N. Knish"   ответов: 2   2005-02-06 13:14:45 (#311002)

Формат рассылок

Здравствуйте.

Кто знает как сделать перемещения фигур (как в шахматных программах), и как использовать
фигуры из картинок (один файл со всеми фигурами)?

   Антон!   ответов: 2   2005-02-06 13:00:18 (#309934)

(Язык Си) Как написать макрос с неизвестным числом аргументов?

Hello comp,

Программа для микроконтроллера с ограниченным объемом ОЗУ.
Поэтому приходится извращаться и размещать строковые константы во
FLASH.
Для печати строк приходится писать:
...
{static __flash char tmp[] = "Текст1 %i\n";printf_P(tmp,para11);}
...
{static __flash char tmp[] = "Текст2 %f, %i\n";printf_P(tmp,par21,par22);}
...

И так по всей программе.

А хочется:

#define PRINTF_P(A,...) {static __flash char PRINTF_P_1[] = A; printf_P(PRINTF_P_1,...);}
//Естественно компилер не понимает многоточие
...
PRINTF_P("Текст1 %i\n",para11);
...
PRINTF_P("Текст2 %f, %i\n",par21,par22);
...

Как быть?

     ответов: 5   2005-02-05 01:30:45 (#309721)

ADO + DBF

Здравствуйте, все.

Вопрос вот в чем:
Код:
Connection = CreateObject("ADODB.Connection");
ConnectionString = "
|DefaultDir=D:\ANTON_WORK\_1C_77\BASE_WORK\АКХЗ;
|DBQ=D:\ANTON_WORK\_1C_77\BASE_WORK\АКХЗ;
|driver={Driver do Microsoft dBase (*.dbf)};
|DriverId=533;FIL=dBase 5.0;
|MaxBufferSize=2048;MaxScanRows=8;
|PageTimeout=600;SafeTransactions=0;
|Statistics=0;Threads=3;UserCommitSync=Yes;";
Connection.Open(ConnectionString);
Cmd = CreateObject("ADODB.Command");
Cmd.ActiveConnection = Connection;
Cmd.CommandText = "
|SELECT CODE,DESCR FROM `SC869`
|";
Rs = CreateObject("ADODB.RecordSet");
Rs = Cmd.Execute;
Rs.MoveFirst();
While Rs.EOF() = 0 do
Rs.MoveNext();
EndWhile;

При проходе по циклу получаю нужные мне значения(тип обоих строка), но
отражаются "крякозябры". Я так понимаю проблема с кодировкой.
В доке не нашел такого параметра ...
Как ее решить?
Заранее спасибо!

   Антон Горячун   ответов: 1   2005-02-04 23:53:41 (#310564)

покрывающее тестирование

Добрый день!
Кто может подсказать ссылки на книги или статьи о покрывающем тестировании программного
кода?
То есть когда проверяем, какие строчки кода задействованы при работе.
Может кто подкинет какое-нибудь описание программ типа NUnit?

C уважением, Бурляев Вячеслав

Номер выпуска : 4003
Возраст листа : 502 (дней)
Количество подписчиков : 524
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/310317
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 0   2005-02-04 14:51:05 (#310317)

LNKXXX DISABLE

Glad to greet, comp!

Достали некоторые warning-и в VC++, пытаюсь отключить (#pragma
warning(disable: XXX)), но эффект нулевой. В чём может быть дело?
Спасибо!

BTW XXX = 4006

Alles Gute!

...In Code We Trust...

     ответов: 1   2005-01-31 21:59:09 (#308031)

сокеты

Hello comp,

проблема с сокетами на WinAPI. Вот фрагмент программы - инициализация сервера
(вызывается в WM_CREATE):

bool StartSockets()
{
if(WSAStartup(0x0202, &g_wsaData))
return 0;

g_hListenSocket = socket(AF_INET,SOCK_STREAM,0);
if(INVALID_SOCKET == g_hListenSocket)
return 0;

sockaddr_in local_addr;
local_addr.sin_family=AF_INET;
local_addr.sin_port=htons(MY_PORT);
local_addr.sin_addr.s_addr=0;
if (SOCKET_ERROR == bind(g_hListenSocket, (sockaddr *) &local_addr, sizeof(local_addr)))
return 0;

if(SOCKET_ERROR == WSAAsyncSelect(g_hListenSocket, g_hWnd, WM_SERVER_ACCEPT,
FD_ACCEPT | FD_CLOSE))
return 0;

if (SOCKET_ERROR == listen(g_hListenSocket, 0x100))
return 0;

// успешно
return 1;
}

все проходит успешно. Сервер ведет себя так, как будто он работает,
т.е. клиенты могут к нему подконнеститься и т.д. Но почему-то
сообщение WM_SERVER_ACCEPT (WM_USER+3) в WindowProc не приходит! Т.е.
я не могу отловить момент, когда клиент хочет подключиться к серверу,
с тем чтобы подключить его функцией accept.
В чем может быть дело? Может быть, неправильное использование
WSAAsyncSelect? Соответствующий аналог для UDP, а также с использованием MFC
CSocket для TCP прекрасно работает, но мне нужно именно WinAPI.

     ответов: 2   2005-01-29 19:18:13 (#305977)

OLE error

Аллоха, All!
В этот знаменательный день 28 января 2005 г.
пиво ударило мне в голову, и я наскреб:

А кто-нить знает что энто за ошибка:
OLE error 8275A638

Выдает моя программа в Win98:
1) Программа на Delphi 5
2) Юзает WebBrowser (оболочка IE)
3) Юзает ShellFolder (ISHellFolder и все в таком духе + OLECheck на
функции SH****)

Скорее всего ошибка выдается на вызовах OLECheck(SH****) но проверить
это не могу.

Может есть какой-нить сайтик где эти ошибки лежат с описанием. Ну
например ткните меня в раздел на microsoft.com

PS: В win2k все нормально.

     ответов: 2   2005-01-29 04:10:08 (#305976)

Re: Чистая музыка

Glad to greet, RASH!

You seem to have written (Thursday, January 27, 2005):

R> обращал). Так вот файлик этот всего ничего весит, каким же макером
R> туда запихали музычку, может ноты прямо в коде написали, тогда как это
R> можно сделать?? Хотелось бы узнать.

Не знаю какой у тебя конкретно кряк (я ничего не слышал), но вот
возможный вариант:

Старая идея, пришедшая ещё с Амиги. Сохраняешь ноты и маленькие
отрывки музыкальных инструментов (сэмплы), а потом воспроизводишь,
меняя частоту в зависимости от ноты. Для особо продвинутых
существует возможность генерировать ещё и эти самые сэмплы (не буду
очень сильно углубляться: это аддитивный и субтрактивный синтез с
дополнительной обработкой).

Если интересно, посмотри мою предварительную версию генератора
инструментов (300 Кб):
http://www.smuta.boom.ru/abhorus/degen.htm

Вообще не знаю, выдел ли ты 64к демы, но во многих муззон на очень
высоком уровне.
Вот зайди на www.pouet.net и скачай топ-10 (учти, там не все 64К).
Добро пожаловать на Демосцену =) .

R> 2 вопрос: Сижу слушаю обычную Winampу, и захотелось мне Чистой музыки
R> без слов. Как можно из файла любого аудиоформата вытащить музыку, если
R> это песня со словами. Я попробовал Соунд Фордж, никаких результатов,

Результатов добиться можно, если поиграться с фильтрацией, но они
будут не лучше Неры.

R> нашел в Нейре функцию (для аудио дисков) называется караоке,
R> приглушает слова, но эффект небольшой, да и музыка искажается, что же
R> можно сделать?? Тоже очень интересно.

Опять же не хочу углубляться в физику/математику (делаю отсыл на
преобразование Фурье ;) ). Короче, энергия среднего голоска
сосредоточена на низких частотах (200 Гц - 2 КГц), вот энергию этих
частотных составляющих и надо уменьшать (полосовой режекторный фильтр).
Другое дело, когда всё записано на разные дорожки, а потом
микшируется. Тут бы ты мог контролировать какой канал отрубать, но
это не наш случай.

Alles Gute!

...In Code We Trust...

     ответов: 6   2005-01-29 03:05:38 (#306523)

Re[2]: Delphi OpenGL

А еще вопрос с OpenGL. Вот на любом языке хоть на Delphi хоть на C++
подскажите пожалуйста вывести изображение на _определенную часть_
формы, а не на всю. Если можно, то как?

     ответов: 6   2005-01-28 20:09:06 (#296626)

php блокировка ip

Привет!

Как на php заблокировать-разблокировать IP адрес?
Socket_set_blocking юзать или как?

     ответов: 4   2005-01-27 21:52:03 (#304669)

Ошибка при удалении обьекта. Delphi

Привет ALL!
Имееться класс:
TLPoint=class (Tlabel)
public
a,b:double;
l:Tlist;
. . .
constructor Create(com:Tcomponent); override;
destructor Destroy;
. . .
end;
constructor TLPoint.Create(com:Tcomponent);
begin
inherited create(com);
bmp:=Tbitmap.Create;
l:=Tlist.Create;
end;
destructor TLPoint.Destroy;
var
i:integer;
begin
inherited Destroy;
bmp.Free;
for i:= 0 to l.Count-1 do
FreeMem(l.Items[i]);
l.Destroy;
end;
В самой программе выполняеться что-то вроде:
var
ListP:Tlist; {Глобальная, в модуле Unit1}
procedure ADD; {Unit1}
var
Lpoint:TLpoint;
begin
Lpoint:=Tlpoint.create(self);
Lpoint.Parant:=form1;
....
ListP.add(Lpoint);
end;
procedure ADD; {Unit2}
var
Lpoint:TLpoint;
begin
Lpoint:=Tlpoint.create(self);
Lpoint.Parant:=form2;
....
ListP.add(Lpoint);
end;
procedure Tform1.DestroyForm(sender:Tobject);
var
i:integer;
begin
for i:= 0 to listP.Count-1 do
begin
TlPoint(listP.Items[i]).Destroy;
end;
listP.Free;
end;
Так вот, если все обьекты созданны и добавленны в Unit1, то всё работает как
надо!!!
Но вот если, хоть один обьект TlPoint создан и добавлен из другого модуля,
то при уничтожении выскакивает куча ошибок обращения к памяти?!
--
В процесси работы пре обращении к обьектам из списка тоже без ошибок
(TlPoint(listP.Items[i].color:=clBlack).
--
Если убрать код Tlpoint.Destroy, то тоже всё ок.
Я вот думаю, моджет вообще обьекты по окончанию работы программы не
уничтожать?
Я слышал, что форточка сама память очистить в состоянии?

Номер выпуска : 3916
Возраст листа : 476 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/294131
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 10   2005-01-26 21:12:32 (#294131)

Delphi OpenGL

Здравствуйте, Програмеры.

Помогите пожалуйста с таким вопросом, рисую сферу, если окно в которое
осуществляется вывод квадратное, т.е. Width = Height то все нормально,
если же это условие нарушить то получается эллипсоид сплюснутый
пропорционально размерам формы.
Win XP Pro

     ответов: 8   2005-01-18 00:43:37 (#295756)

Anons corrected

Здравствуйте !

Уважаемые подписчики, приношу, свои извинения, но,
к сожалению, первый анонс получился несколько неполным.
Привожу исправленный текст.

Рассылка "Кто есть ХУ на Subscribe.Ru"

АВТОРЫ рассылок и МОДЕРАТОРЫ диск.листов и форумов
рассказывают в этой рассылке о своих проектах.

Только ЗДЕСЬ ВЫ УЗНАЕТЕ всю правду об авторах и
модераторах: КТО__ЕСТЬ__КТО__НА__SUBSCRIBE.ru!"

Такого _откровенного_ проекта на Subscribe.Ru
Вы еще не видели...

Адрес рассылки:
http://subscribe.ru/catalog/news.whoisxy
подписка письмом:
mailto:news.whoisxy-sub@subscribe.ru

--
С уважением, Вахтуров Виктор.

Номер выпуска : 3945
Возраст листа : 481 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/297411
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 5   2005-01-15 22:18:38 (#297411)

Anons

Здравствуйте !

Господа !
В рамках программы раскрутки данного листа :)

Я рад презентовать Вам _уникальный_проект_:

рассылку "Кто есть ХУ на Subscribe.Ru"

АВТОРЫ рассылок и МОДЕРАТОРЫ диск.листов и форумов
рассказывают в этой рассылке о своих проектах.

Только ЗДЕСЬ ВЫ УЗНАЕТЕ всю правду об авторах и
модераторах: КТО__ЕСТЬ__КТО__НА__SUBSCRIBE.ru!"

Такого _откровенного_ проекта на Subscribe.Ru
Вы еще не видели...


--
С уважением, Вахтуров Виктор.

Номер выпуска : 3944
Возраст листа : 480 (дней)
Количество подписчиков : 519
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/297315
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 1   2005-01-15 21:49:15 (#297315)

аналог функции

Здравствуйте!
Подскажите пожалуйста аналог Visual Basic функции Sgn на Дельфи, оченб
нужно!

     ответов: 3   2005-01-14 17:09:51 (#296853)

kz

Здравствуйте.
Система Win XP sp2, Delphi7
Проблема такая: В проекте необходимо использовать казахский язык. Но при наборе
специфических каз. символов
таких как ? ? ? ? ? ? ? ? отображаются ?,???,,?,??.
Кстати это проблема не только Delphi, почему-то часть программ работает корректно,
а другая нет.

P.S. Используемые шрифты поддерживают KZ (Arial, Times New Roman и т.д. ).

С уважением,
Алексей.

Номер выпуска : 3929
Возраст листа : 478 (дней)
Количество подписчиков : 518
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/295770
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

   "Alex"   ответов: 2   2005-01-13 11:27:27 (#295770)

Ошибка при удалении обьекта_2. Delphi

Привет ALL!
Если всё зделать так.
/=========/
destructor TLPoint.Destroy;
var
i:integer;
begin
bmp.Free;
l.free;
inherited Destroy;
end;
procedure Tform1.DestroyForm(sender:Tobject);
begin
listP.Free;
end;
То работает без ошибок.
Меня интересует класс Tlist.
- Я же сам создал обьект, следовательно должен и сам его удалить. Не учто
List.Free уничтожает ещё все обьекты, связанные с ним?
Если да, то он вызавет деструктор или каким-нибудь "диким" метод очистит
память?
--
Ктому же в l- я записываю указатели на тип-запись. Метод Free очистит
память, занятую и под них?
А как можно прокантралировать освобождение памяти?

Номер выпуска : 3925
Возраст листа : 477 (дней)
Количество подписчиков : 518
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/295126
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

     ответов: 2   2005-01-12 19:35:52 (#295126)

Re: Сложный тип данных 2

> Ни как это не пойму:
> Я создаю такой перечисляемы тип:
> type
> TMyType = (Sun, Microsoft, Mandrake);
> ...
> var
> MyF: TMyType;
> ...
> MyF := Sun;
> MyF := Mandrake;
> MyF := Microsoft;
>
> А теперь как узнать что находится заполненным в MyF? то етсь что
> именно было заполнено ( MyF := ...???; ) а что нет?
> Возможно ли перечисляемы тип конвертировать в string, integer?
> И какие вообще возможности дает программисту свой новый тип данных?

Мне кажется, проблема в том, чтобы понять, что переменная типа TMyType может
содержать только одно из возможных значений в одно время, а не несколько
сразу. :-) Это ведь не массив и не список и даже не множество.

В каждый момент времени она равна либо Sun, либо Mandrake, либо, на худой
конец, Microsoft, но не их сочетанию.

А этот тип, кстати, не такой уж и сложный... Мне кажется, record - и тот
посложнее будет. :-|

Конвертировать в string - врятли (или можно любезно предоставленной janalex
функцией), а в integer, думаю, возможно... Может быть, ord() поможет... А
может и не быть... А может быть, integer()... Не юзирую паскакаль, не помню.

А что новый тип дает программисту - наверно, более простой/эффективный
способ организации своих данных. Ведь хороший алгоритм можно написать в
случае, если данные представлены в удобной для обработки форме.

Номер выпуска : 3921
Возраст листа : 476 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/294331
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2005-01-10 22:52:01 (#294331)

? > .obj

...::: Приветствую, All :::...

При компиляции исходника написанного на C++ Builder он требует
K32LIB.OBJ, а папке с исходником лежит только K32LIB.??? как в C++
Builder специальный файл перевести в OBJ ?

= = = = = = = = = = = = = = = = = = = =
...::: by GENEMI :::...

Номер выпуска : 3920
Возраст листа : 476 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/294295
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2005-01-10 21:34:14 (#294295)

Сложный тип данных.

Есть такой тип: TConnectionType = (ctNone, ctDialup);
и есть функция которая возвращает значение типа TConnectionType
(function ConnectedToInternet: TConnectionType;)
Result := ctNone;
или
Result := ctDialup;
И как результат функции - которая возвращает значение типа
TConnectionType - перевести в строку?
Просто я про типы данных вроде все понял, а вот как работать со
сложными типами, понятия не имею :)

Номер выпуска : 3912
Возраст листа : 475 (дней)
Количество подписчиков : 517
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/293408
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 3   2005-01-10 14:01:52 (#293408)

Динамическая память

Привет программисты,

Пишу так:
type
PData = ^TData;
TData = record
...
Next: PData
end;
......................
var
P, M: PData;
......................
P:=M^.Next;
Dispose(M)
M:=P;
......................

Ошибка: Почему-то в М оказывается, то что должно было удалиться, где
искать ошибку???
Пробывал различные вариации, типа
P:=M;
M:=P^.Next;
Dispose(P);
и т.п. - не помогает :(

Использую Delphi 7 без SP

Афоризм напоследок: Столько дел, что и работой занятся некогда...
23 декабря 2004 г. 22:14:16

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 3900
Возраст листа : 459 (дней)
Количество подписчиков : 514
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/286169
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 10   2004-12-27 22:42:26 (#286169)

Логотип загрузки Win9x/Me

Здравствуйте!

Подскажите, в каком файле лежит сабж (bmp-картинка, в смысле)?

   Ведомир   ответов: 20   2004-12-26 18:56:58 (#243751)

Перекодировка буфера.

Здравствуйте все.

Джентльмены, есть такая проблемма. Звук, от источника, попадает в
микрофон. С микрофона попадает в буфер в waw-формате. Необходимо в
в Билдере перекодировать содержимое буфера в другой формат, mp3, например,
и сбросить на диск уже в новом формате. Т.е. прием и перекодировка должны
производиться одновременно, насколько это возможно.
Подайте, плиз, страждущему, увесистый кусок кода или идею алгоритма
такой перекодировки. На худой конец ссылочку на нечто подобное, если
такая есть.

   RingLeader   ответов: 4   2004-12-21 09:38:25 (#283061)

Delphi debug

Здравствуйте, Програмеры.

Кто нить подскажет, почему прога под делфой работает нормально, а
отдельно ошибки выдает.

     ответов: 9   2004-12-20 03:32:48 (#276775)

TDBGrid

Доброй поры суток...

Есть вопрос, может ктозначет, как получить значение порвой(любой)
ячейки, на ряде которой кликнул юзверь в TDBGrid?

Павел a.k.a BOER mailto:bo***@u*****.fm

Номер выпуска : 3891
Возраст листа : 452 (дней)
Количество подписчиков : 514
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/282686
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-12-19 17:12:04 (#282686)

Re: Расчет матриц с комплексными числами

Здоровеньки булы, Александр Томилов!

16 декабря 2004 г., четверг, 23:21:25 (GMT+05:00), пришел ко мне
почтальон Почкин и всучил письмо с пометкой "Расчет матриц с комплексными числами",
в котором сообщалось следующее:

АТ> Аллоха, All!
АТ> В этот знаменательный день 16 декабря 2004 г.
АТ> пиво ударило мне в голову, и я наскреб:

АТ> Subj

АТ> BEGIN------------------CUT HERE-----------------cut hereОй сорри - не туда улетело

   Александр Томилов   ответов: 1   2004-12-16 21:30:36 (#281992)

обход дерева(Delphi) останов и продолжение

имеется сл. вопрос (Delphi)
что такое рекурсивный обход дерева каталогов думаю объяснять глупо
а вот как его остановить (с выходом из программы) а потом продолжить
после запуска - это вопрос. Вроде все сохраняю (Searchrec) в файл,
потом гружу - не выходит. Хелп...

Номер выпуска : 3860
Возраст листа : 441 (дней)
Количество подписчиков : 509
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/276360
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

   Павел Звягинцев   ответов: 6   2004-12-16 01:00:53 (#276360)

Про контекстное меню и др.

Есть ли у кого-нибудь конкретная информация и/или исходники про создание и использование
следующих вещей:
1) ContextMenuHandlers - вложенные меню в контекстное меню проводника Windows
2) PropertySheetHandlers - дополнительные вкладки свойств
3) DragDropHandlers и/или DropHandler - дополнительные пункты в меню копирования/перемещения
файлов
4) InfoTipHandlers - изменение подсказки для файлов
Просьба писать сюда или на buh#hotbox.ru (вместо # подставь @). Исходники (если
есть) выслать туда же: buh#hotbox.ru (вместо # подставь @)

С уважением, Бухарин Дмитрий Игоревич
http://buh.hotbox.ru
#ICQ:8-775-125

Номер выпуска : 3878
Возраст листа : 448 (дней)
Количество подписчиков : 513
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/279956
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

   Бухарин Дмитрий Игоревич   ответов: 0   2004-12-13 19:31:21 (#279956)

спрятать курсор в RichEdit

Здравствуйте!
Помню, поднимал как-то Борман вопрос о скрытии мигающего курсора в
richedit'e. Так вот, в том треде так и не пришли к выводу, как лучше
от него избавиться, поэтому хочу вновь поднять эту тему.
Делитесь своими предложениями.

     ответов: 1   2004-12-12 22:25:42 (#279178)

КР580[2]

Привет всем!!
cmmn> А какая нужна более конкретная информация?
Проектирование микропроцессорных систем на базе МП КР580ВМ80А с
использованием комплекта КР580, а также микросхем совместимыми с ним.
cmmn> Соответственно можно поискать журналы РАДИО примерно за 80-е года.
cmmn> Или в I-net на тему i8080.
VVV> Вот ссылки, которые удалось найти (/G_RADIO/):
Спасибо за интересный материал. Я тоже в нете полазил, но ничего
нормального для себя не нашел (конкретного описания комплекта,
принципы и примеры построения структурных и функциональных схем),
чтобы знания по этому вопросу приняли приличную форму и содержание. А
в библиотеке даже рекомендуемой литературы нет ("МП" под ред.
Шахнова, "МикроЭВМ" под ред. Преснухина и т.д.).
DK> Ты либо фанат (old school), либо студент 8)
Да, я - студент, такому еще учат.....хотя мне нравится.

   RASH   ответов: 12   2004-12-12 11:39:12 (#248152)

INTRBASE & VC++

Доброй поры суток...

Подскажите, как вообще их совместить???
Всё, что я нашеёл, убеждает использовать Делфи...

Павел a.k.a BOER mailto:bo***@u*****.fm

Номер выпуска : 3871
Возраст листа : 445 (дней)
Количество подписчиков : 512
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/278654
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 1   2004-12-12 11:38:35 (#278654)

РИХТЕР: VC vs BCB

Аллоха, All!
В этот знаменательный день 29 ноября 2004 г.
пиво ударило мне в голову, и я наскреб:

Скачал книгу:

Джеффри РИХТЕР

Создание эффективных WIN32-приложений
с учетом специфики 64-разрядной версии Windows

И к ней примеры.
Примеры, как я понял, должны компилироваться в VC, но за неимением под
рукой VC (не хочу еще и с ним связываться) - компилирую в Borland C++ Builder.
Не компилируется ;)
Кто-нить подобным образом дурью маялся? И у кого что получилось?

PS: В конечном результате я хочу парочку примеров в Delphi перевести -
если у кого Рихтеровские примеры на Delphi переведены или ссылку
знаете - киньте в меня, это будет даже еще лучше чем компиляция в BCB.

   Томилов Александр   ответов: 2   2004-12-08 22:26:10 (#272267)

DDE

Привет, народ! :-)

Появилась потребность разобраться в технологии Dynamic Data Exchange, DDE. В
интернете не удалось найти хороший ресурс на эту тему, поэтому обращаюсь к
вам, может быть, у кого-то есть толковое описание, или подходящий URL,
желательно на русском языке.

Номер выпуска : 3865
Возраст листа : 442 (дней)
Количество подписчиков : 510
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/276874
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2004-12-07 23:23:45 (#276874)

Литература по VC++

Не подскажите смачный урлик по литературе для обучения в VC++ (7я
версия)... Желательно с примерами. Я практически в С++ с нуля начинаю.
Заранее благодарен, Евгений...

Номер выпуска : 3856
Возраст листа : 440 (дней)
Количество подписчиков : 509
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/275577
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-12-06 22:12:10 (#275577)

Приглашение

Добрый вечер. Буду краток :)
25 февраля 2004 года стартовал проект создания операционной системы
жесткого реального времени Уж(сокращенно УжОС).
Сия ОС может реально потеснить системы управления промышленным
оборудованием наподобие QNX, а также такие популярные ОС как Windows и
Linux, оставаясь совместимой с ними. УжОС позволит запускать из-под
себя не только приложения других ОС, но также сами ОС.
Для воплощения этого проекта в жизнь требуются программисты со знанием
Си и Ассемблера, а также дизайнеры.
План работ составлен, разработка начата. Самое время вливаться в
команду.
С вопросами обращаться по адресу kret***@n*****.net
Чтобы вступить в команду разработчиков, пишите на sseman***@m*****.ru

     ответов: 0   2004-12-05 18:40:52 (#275614)

Clipboard + wave/riff

Glad to greet, comp!

Захотелось сделать копирование в буфер обмена в формате понятном для
других приложений, т.е. программа формирует звуковые данные, и
хочется чтобы их можно было вставить в некий звуковой редактор.
Возможность обмена проверена между разными редакторами.
Ессно, покопался в MSDN, но там про это довольно расплывчато и не
сказано что конкретно передавать вторым параметром в
SetClipboardData в случае звука. Может кто пробовал или где-то
видел? Заранее спасибо.

Alles Gute!

...In Code We Trust...

     ответов: 1   2004-12-03 22:07:57 (#273386)

Что выбрать - C++ или C#????

Люди, подскажите что лучше выбрать на ваш взгляд С++ или С#???
Просто хотелось бы выслушать вашу точку зрения и почему...
Заранее благодарен.

С уважением, Евгений...

mailto:recru***@p*****.ru
ICQ - 237652277

Номер выпуска : 3818
Возраст листа : 429 (дней)
Количество подписчиков : 507
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/269860
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 5   2004-12-02 12:48:45 (#269860)

программа записи на CD-R

Привет! Подскажите какой-нибудь ресурс где можно было бы найти руководство
по созданию подобных программ. Выбор языка неважен, но желательно что-нибудь
сродни C++ Pascal Basic.

А вы сами что можете сказать по этому поводу? Есть ли в Дельфи набор функций
для работы с CD-RW? Как распознать модель, что она может делать (записывать,
стирать, читать двд, писать на двд, скорость чтения-записи модели).

--
с уважением,
Александр

Номер выпуска : 3842
Возраст листа : 434 (дней)
Количество подписчиков : 509
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/272233
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 4   2004-12-01 20:44:20 (#272233)

[Delphi] - Где можно взять классы TdxTreeList и TTBToolbar...

Здравствуйте, comp.

Кто-нибудь может подсказать, где можно достать классы TdxTreeList и
TTBToolbar или компоненты к которым они относятся (Delphi и C++Builder)?

   Feniks   ответов: 0   2004-12-01 11:18:30 (#272970)

[Delphi & C++Builder] - Designtime and runtime пакеты...

Здравствуйте, comp.

Объясните мне пожалуйста, в чем разница между пакетом Designtime и
runtime ? И если можно, поподробней.
Я сейчас пишу компоненты и мне надо сделать пакеты (.dpk) для разных
версий Delphi и C++Builder и в опциях пакета надо указать "Usage
options".
Помогите, плиз.

   Feniks   ответов: 0   2004-12-01 11:17:50 (#272969)

Re: Delphi StringGrid

> Как удалить строку с произвольным номером из StringGrid?

Вот так:
StringGrid1.Rows.Delete(I);

Обьявление: property Rows[Index: Integer]: TStrings;

Удачи Вам! ;-)

Номер выпуска : 3801
Возраст листа : 425 (дней)
Количество подписчиков : 503
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267743
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 3   2004-11-28 16:56:10 (#267743)

TIdFTP Delphi 7

Здравствуйте, progs.

Какой метод у компонента TIdFTP скачивает файл?

     ответов: 0   2004-11-28 16:55:59 (#271659)

Re: Access - VBA

Госпожа Галина Стецик,



Best regards,

At 2004-11-24, 23:39:19 you wrote: >Проблема заключается вот в следующем:
>необходимо организовать поиск в некоторой таблице по нескольким полям (от 1-7).

>Т.е. на форме находятся семь текстовых полей и по введенным значениям в любых

>из этих полей (это может быть 2, 3, ... или даже все 7) при нажатии на кнопку,

>если в таблице найдены записи удовлетворяющие одновременно всем заданным полям,

>появлялась таблица с итогами поиска.
>Пыталась сделать запрос, но что-то не получилось. Потом через фильтр, но тоже

>что-то никак. Так что чем можете помогите.
>И еще вопрос, есть ли в Access возможность записи макроса по произведенным действиям.


Наиболее простым, можно сказать примитивным, решением Вашей проблемы было бы,
по-моему, выполнение следующих действий в указаваемой очерёдности:

1)учреждение ленточной формы для представления исходной таблицы

при этом следует отметить, что, поскольку в Вашей таблице многовато полей, чтобы
представлять их "в одну строчку", то в этой таблице выводить только ключевые
и наиболее информативные (для "юзверя") поля - С ОСТАЛЬНЫМИ ПОЛЯМИ ЭТОЙ ТАБЛИЦЫ
ВСЕ РАВНО ТОЖЕ МОЖНО РАБОТАТЬ ПРОГРАММНО!

2)учреждение таблицы для получаемых записей и такой же формы как в пункте 1 для
таблицы получаемых записей

3)учреждение в ленточной форме (пункт1) кнопки и процедуры реакции на её нажатие,
в которой программируется следующий псевдокод

ПОИСК ЗАПИСЕЙ ПО УСТАНОВЛЕННЫМ ТРЕБОВАНИЯМ
Предварительная отработа параметров
ЦИКЛ-ПОКА не обнаружен конец таблицы
Обращение к очередной строке таблицы в текущей ленточной форме
Определение значения логического выражения, представляющего требования к искомой
записи
ЕСЛИ требования удовлетворены
Занесение текущей записи в таблицу найденных записей (проще всего - обращением
к SQL через runSQL)
Учёт существования требуемых записей
ВСЕ-ЕСЛИ
ВСЕ-ЦИКЛ
ЕСЛИ требуемых записей не найдено
Выдача соответствующего сообщения
ИНАЧЕ
Обращение к ленточной форме для найденных записей (пункт 2)
ВСЕ-ЕСЛИ
ВСЕ-ПОИСК ЗАПИСЕЙ ПО УСТАНОВЛЕННЫМ ТРЕБОВАНИЯМ


Что обезопасить себя от всяческих "незадокументированных особенностей" включите
в "предварительную отработку переметров" переход на конец таблицы (acNewRec)
и на первую запись (acFirst) и делайте всё это через "On Error Resume Next" -
я подразумеваю, что переходы в таблице Вы будете делать через GoToRecord для
текущей ленточной формы.

3)скопируйте уже построренную Вами форму, о которой Вы говорите в Вашем письме
и определите для этой копии источником записей таблицу нацденных записей

3)определите в ленточной форме для найденных записей реакцию на Enter на текущей
строчке как переход к уже форме-копии из предыдущего пункта для текущей записи


НЕДОСТАТКИ ПРЕДЛАГАЕМОГО РЕШЕНИЯ
1) медлдительность
2)возможный эффект "вырви глаз" для больших таблиц - при отработке процедуры
пункта 3 курсор будет перемещаться по таблице, которая может при этом сильно
дёргаться

ПРЕИМУЩЕСТВА
1)сравнительная простота реализации
2)абсолютная надёжность реализации независимо от используемой версии Access

3)возможность следить за процессом поиска - полезно при отладке и приятно некоторым
"юзврям"

Что касается вопроса о макросе...
Access более ориентирован на реализацию процедур как реакцию на "нажатие" виртуальных
кнопок: если что-то требуется регулярно делать - "рисуйте" форму, "тавте"туда
"кнопочку" и "заводите" по нее процедуру - но это моё личное мнение.
С уважением, Приходько



Номер выпуска : 3836
Возраст листа : 433 (дней)
Количество подписчиков : 508
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/271641
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2004-11-28 16:03:06 (#271641)

Привет all,

У кого-нибудь есть информация по написанию внешних компонент для 1С.
Обычная DLL и ActiveX DLL не подходят!
В инете есть информация об источнике "Технология создания внешних
компонент", но только в форумах или интернет-магазинах.

Если что-то есть или хотя бы советы - буду благодарен

Афоризм напоследок: Жизнь нужно прожить так, чтобы Боги в восторге предложили
еще одну.
12 ноября 2004 г. 17:27:21

Просто студент
Eugene mailto:rav***@o*****.ru

Номер выпуска : 3780
Возраст листа : 417 (дней)
Количество подписчиков : 502
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/262487
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-11-27 12:35:15 (#262487)

Re: Access - VBA

Добрый день, Галина.

Г> Пыталась сделать запрос, но что-то не получилось.
что значит "что-то не получилось"?
как Вы запрос делали?
а вообще...

'надо описать базу данных:
Dim dbs As Database
'и "набор записей" - временную таблицу, в которой у Вас будут храниться
'результаты запроса:
Dim rst As Recordset

Dim strSQL As String ' строка SQL-запроса
Dim str_tmp As String ' переменная строка - для формирования SQLзапроса

Dim ctrl_sum As Integer
'зададим БД - текущей:
Set dbs = CurrentDb()

'стандартная шапка запроса:
strSQL = "SELECT * FROM [название таблицы] "

'*************************************************
' теперь будем добавлять к strSQL - нужные нам условия.
' пусть поля находятся на форме Form1 и называются соответственно
' Text1, Text2, ..., Text7
'
' единственная проблема может возникнуть - если ни одно из полей не
' заполнено - тогда параметр WHERE в SQL запросе вообще не будет
' нужен. надо просто обработать этот случай отдельно. Для этого после
' проверки каждой строки - в случае, если поле не заполнено - будем
' увеличивать некую контрольную сумму на 1 (ctrl_sum) - и если ее
' значение после прохождения всех полей будет совпадать с их
' количеством - просто не будем добавлять никаких условий в
' sql-запрос. Ну или - как Вам по смыслу лучше подойдет. можно вообще
' такой запрос не обрабатывать, а выдавать ошибку.
'*************************************************

str_tmp = ""
ctrl_sum = 0

If (Forms![From1]![Text1].Value <> "") Then
str_tmp = str_tmp & " [Field1]=" & Form1![Text1]
Else
ctrl_sum = ctrl_sum + 1
End If

If (Forms![From1]![Text1].Value <> "") Then
If (ctrl_sum > 0) Then
str_tmp = str_tmp & " AND "
End If
str_tmp = str_tmp & " [Field1]=" & Form1![Text1]
Else
ctrl_sum = ctrl_sum + 1
End If

' ............
' ... то же самое для 3, 4, 5, 6 полей
' ............

If (Forms![From1]![Text7].Value <> "") Then
If (ctrl_sum > 0) Then
str_tmp = str_tmp & " AND "
End If
str_tmp = str_tmp & " [Field7]=" & Form1![Text7]
Else
ctrl_sum = ctrl_sum + 1
End If

If (ctrl_sum < 7) Then
strSQL = strSQL & " WHERE " & str_tmp
Else
' если считаем, что все незаполненные поля - это ошибка, - то
' ругаемся тут. если ругаться не хотим - можно убрать Else
End If

' запускаем SQL-запрос на выполнение
Set rst = dbs.OpenRecordset(strSQL)

If (rst.EOF) Then
Form1![Label1].Caption = "По Вашему запросу ничего не найдено"
Else
While (Not (rst.EOF))
' действия с каждой найденной записью (строкой) -
' отдельно в формате rst.Field(номер_столбца_таблицы)
rst.MoveNext
Wend
End If

' завершаем работу с переменными:
rst.Close
dbs.Close

' сбрасываем "указатель" на БД
Set dbs = Nothing

Насчет того, как в таблицу результаты выводить.
Можно - взять "список", добавить в него столбцы - и в том цикле,
который идет по полученным записям - добавлять эти записи в список.
Несколько колонок он допускает.
Или - можно сохранить результаты запроса в Query (спросите, как это
делать, у Справки) - и потом с помощью мастера связать список с этим
запросом.

Нумерация столбцов таблицы - если мне память не изменяет - ведется с
единицы. но - проверьте на всякий случай.

     ответов: 2   2004-11-27 12:34:58 (#270487)

куда щелкнул юзверь?

Доброрго всем!
есть Image в него загружена картинка с цветными облястями и черными
границами, в качестве примера:

image1.Canvas.Brush.Color:=clRed;
image1.Canvas.Ellipse(rect(10,10,50,50));
image1.Canvas.Brush.Color:=clGreen;
image1.Canvas.Rectangle(rect(10,70,50,110));

надо узнать щелкнул ли юзверь по элипсу или квадрату, к цвету привязку
делать не стоит т.к. он может меняется.
Реально области намного сложнее.

Заранее всем спасибо

prog_alex76 mailto:prog_alex***@m*****.ru

Номер выпуска : 3793
Возраст листа : 423 (дней)
Количество подписчиков : 502
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/266983
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 6   2004-11-26 23:10:44 (#266983)

Re: [C++Builder & Delphi] - Визуальные компоненты для пользовательского интерфей

Здравствуйте, Feniks.

F> Здравствуйте.

F> Кто-нибудь подскажите хорошие VCL компоненты для создания
F> пользовательского интерфейса в стиле ХР под Delphi 5 и C++Builder 5.
F> И таблицы StringGrid и DBGrid с поддержкой многострочности в одной
F> ячейки и что бы выглядели по симпатичней, чем родные VCL-ные.
Для делфи и BC есть прекрасный компонент - Virtual String Treeviev
называется. Там используя его можно что душе угодно сделать - хочешь,
типа StringGrid, Listbox, Treeviev, подобные. Можешь в инете поискать.
Если надо могу архив скинуть.

С уважением, Евгений...

mailto:recru***@p*****.ru
ICQ - 237652277

Номер выпуска : 3819
Возраст листа : 429 (дней)
Количество подписчиков : 507
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/269861
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-11-25 13:40:25 (#269861)

[CPP] Console::WriteLine vs printf

Доброго времени суток,comp!

начал изучать си++ с простейшей программы hello_world
И вот первый вопрос:
Что предпочтительнее использовать и какая разница?
Console::WriteLine
printf
cout
?

Работаю в интегрированной среде MS Visual Studio .NET 2003
Если я правильно понял, то Console::WriteLine будет поддерживаться
только Windows-подобными системами, точнее даже, где есть .NET
Framework. Какие плюсы-минусы у этого способа?

Какие плюсы-минусы у printf ? Что-то слышал про переполнение буфера и
прочие бяки у этого способа.

   Ildar &lit   ответов: 3   2004-11-24 21:56:42 (#267722)

[PHP] - Как можно построить график...

Здравствуйте.

Подскажите, кто-нибудь, как можно на РНР построить графики, как
делает это, например Excel, и выдать их на страничке пользователю ?

   Feniks   ответов: 2   2004-11-24 17:57:14 (#269141)

GDB & VC++

Доброй поры суток...

Скажите пожалуйста, каким образом можно получить данные из базы данных
c расширением GDB???

Павел a.k.a BOER mailto:bo***@u*****.fm

Номер выпуска : 3800
Возраст листа : 425 (дней)
Количество подписчиков : 503
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267739
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-11-22 21:18:41 (#267739)

Уточнение

Здравствуйте !

Сообщения:
Message-Id: <20041120213211.267740@comp.soft.prog.prog.subscribe>
Message-Id: <20041120213535.267743@comp.soft.prog.prog.subscribe>
не мои -см заголовки :)

--
С уважением, Вахтуров Виктор.

Номер выпуска : 3807
Возраст листа : 426 (дней)
Количество подписчиков : 503
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267911
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2004-11-21 00:37:57 (#267911)

Проблема с COM в Visual C++

Здравствуйте.
Моя проблема заключается вот в чём:
во время компиляции файла idl автоматически создаются файлы с расширением *_h.h,
*.i, *.p и файл dlldata.c; при включении этих файлов в проэкт компилятор начинает
ругаться, а именно:
fatal error C1010: unexpected end of file while looking for precompiled header
directive
указатель ошибки устанавливается на один из выше указаных файлов
созданых компилятором. Версия VC++ седьмая.
Объясните мне, в чём проблема и как её ликвидировать.
Мой e-mail:Vahman***@u*****.net
Заранее благодарен.

Номер выпуска : 3805
Возраст листа : 425 (дней)
Количество подписчиков : 503
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267898
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2004-11-20 23:48:16 (#267898)

наследование VCL-объекта в BCB

Glad to greet, comp!

Захотелось сделать TPaintBox с back buffer для отрисовки по
WM_PAINT:

class CPaintBoxBuffered : public TPaintBox
{
public:
Graphics::TBitmap* back_buff;
public:
repaint();
}

Всё нормально, перерисовывается и пр., но при выходе из приложения
вываливается сообщение об exception-е в пустом деструкторе главной
формы (Invalid Pointer Operation). Это происходит, только если изменить
back_buff (выделить память или взять откуда-то адрес). Как мне
видится, там он чистит/собирает всю выделенную память, но что ему не
нравится в случае, если я просто делаю back_buff=NULL ? Как этого змия одолеть?
Заранее спасибо.

Alles Gute!

...In Code We Trust...

     ответов: 0   2004-11-20 22:12:37 (#267875)

Вызов функции в VC 7

Здравствуйте!

Есть проект MFC - SDI, есть созданный в ручную класс myClass, не
являющийся ни чьим наследником. Из функции этого класса myClass хочу
вызвать функцию Invalidate() (или любую другую функцию!) класса
СMyprogramView следующим образом:

СMyprogramView::Invalidate();

и получаю сообщение об ошибке:

error C2352: illegal call of non-static member function

Явно что-то делаю не так. Заранее спасибо за ответ!

Сергей

Номер выпуска : 3797
Возраст листа : 423 (дней)
Количество подписчиков : 502
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267071
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 2   2004-11-20 21:41:47 (#267071)

Re: Работа со строкой

СФормируй рабочий массив, указав в качестве разделителя "\",
а потом сделай сборку в нужном филе
С уважением, Анатолий

> Строку типа C:\Program Files\FlashGet\ надо преобразовать к виду:
> C:\Program Files\, а ее к C:\ . Т.е. как бы сделать переход
> на предыдущую
> директорию. Посоветуйте, пожалуйста, как это можно сделать.
--

Номер выпуска : 3800
Возраст листа : 425 (дней)
Количество подписчиков : 503
Адрес в архиве : http://subscribe.ru/archive/comp.soft.prog.prog/msg/267740
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru

-*Информационный канал Subscribe.Ru
Подписан адрес:
Код этой рассылки: comp.soft.prog.prog
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru?subject=comp.soft.prog.prog

http://subscribe.ru/ http://subscribe.ru/feedback

     ответов: 0   2004-11-20 21:32:11 (#267740)