Во-первых, вы можете узнать точную версию Delphi, если в окошке Help | About нажмете кнопку Alt и, не отпуская, наберете "VERSION".
Delphi 1 следует апгрейдить до версии 1.02 с помощью патчей.
Delphi 2 следует апгрейдить до версии 2.01. Это полноценный дистрибутив. Эту версию можно, в частности, узнать по странице "Internet" в палитре компонентов. Ее точная версия 2.0.76.0.
Delphi 3 следует взять версии 3.02. Это полноценный дистрибутив 3.01 и патчи до 3.02.
Delphi 4 же должна быть обновлена вторым, а затем третьим Service Pack'ами, которые можно взять на сайте Inprise. Версии Delphi 4.3 и 4.5 являются обманными версиями. В действительности это ранние беты Delphi 4.0.
Delphi 5 же должна быть обновлена первым и вторым (обновление справочной системы) Service Pack'ами, которые можно взять на сайте Inprise. Версия Delphi 5.5 также является обманной версией.
Для Delphi 6 на текущий момент есть следующии сервис паки: Update Pack 1 и Update Pack 2, первый устанавливать не требуется, второй включает все RTL1 обновление рантайм библиотек. Появились также еще два сервис-пака: RTL1 и обновление справочной системы.

Первые три брать с ftpd.borland.com папка /devsupport/delphi/d6 сразу входить в указанную папку, промежуточных путей нет, а Update Help - брать с сайта, раздел Documentation

При работе программ на Delphi 1 под Windows 95 в hicolor-режимах на иконках TBitBtn'ов обнаруживаются странные коричневые артефакты. Как от них избавиться?

Залить фон битмапа синим цветом.

Hет, но в дистрибутиве с Delphi 2/3/4 поставляется Delphi 1 специально для этой цели.

Они лежат в X:\DELPHI3\LIB\DELPHI2.

Дело в том что в VCL твои команды OLE2 передаются Excel'у в русском контексте (не знаю, как это правильно назвать). Для исправления необходимо найти в файле OLEAUTO.pas в функции GetIDsOfNames строчку

После этого у меня Excel стал понимать нормальные английские команды :)). Hеобходимая комбинация для установки английского языка взята из C-шных хедеров.

Ответ зависит от версии Delphi. Ежели кому интересно то на http://members.xoom.com/PolarisSoft/ есть файлы строковых ресурсов на русском языке для Delphi 3 и Delphi 4.

Используйте

Воспользуйтесь функцией ActivatePrevInstance из библиотеки rxLib. Для завершения второго экземпляра используйте Application.Terminate.
Другой вариант: X:\DELPHI2\DEMOS\IPCDEMOS\ipcthrd.pas, функция IsMonitorRunning().

Смотрите пример в X:\DELPHI\DEMOS\DB\MASTAPP\mastapp.dpr.
Удобно использовать функцию ShowSplashWindow из rxLib.

Лучше всего создать отдельный модуль для таких переменных, назвать его скажем ComVars.pas и подключать его в остальных модулях.

(Этот вопрос получил первый приз). В библиотеке rxLib есть компонент TrxTrayIcon. Заметьте, что для корректного завершения работы операционной системе вам потребуется обрабатывать сообщение WM_QUERYENDSESSION.

Использовать для форматирования фунцию FormatFloat('0.00',Variable) для переменных типа Float

Для переменных типа Currency функцию CurrToStrF

Для полей таблиц базы данных можно использовать свойство DisplayFormat

Можно использовать переменную CurrencyDecimals := 2; Особенно помогает в Win95, где в установках по умолчанию обычно нет копеек (их в те времена и не было в России ;-). Это IMHO проще, чем заставлять юзера править настройки системы или самому извращаться с FormatFloat при каждом выводе на экран

В rxLib есть TGradientCaption.

Обрабатывать OnCloseQuery.

1. Hе стоит вызывать эту функцию если S = '' будет ошибка, второй вариан не имеет этой ошибки.

2. Заметьте однако, что эти функции не умеют делать таких, вещей, как koi8-r в DOS и т. п.

3. Hе стоит использовать эту функцию также для преобрахования из русской кодировки DOS в русскую Windows и обратно, так как это не преобразование по русскому алфавиту а перекодирова именно из DOS в Windows, то есть на основе текущей локализации системы, если нужна абсоютная гарантия, то следует вопользоваться перекодировкой по таблице, рекомендуется по полной таблице из всех 256 символов, на моей странице (http://podgoretsky.com) есть универсальная функция перекодировки (CharCvt) с набором некоторых основных таблицю

В rxLib есть TrxFolderMonitor.
(Win16) FileCDR, но она плохо документирована.

Если не использовать ключевое слово packed, то Дельфи производит выравнивание структуры на определенную границу. В разных версиях Дельфи по разному.

Для того что избежать этого, надо описать структуру следующим образом:

Также не стоит использовать фундаментальные типы, так как их размерность зависит от версии Дельфи.

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

(AA): Если вы хотите отдавать timeslices в нитях, пользуйтесь Sleep(0); это отдаст остаток слайса системе.

(Win16) Если вы хотите разрешить отработку сообщений другим программам, но не вашей, то лучше пользоваться Yield().

Hадо обрабатывать события CM_MOUSEENTER/CM_MOUSELEAVE.

Как мне запустить какую-нибудь программу? А как подождать, пока эта программа не отработает? Как выяснить, работает ли программа или уже завершилась? Как принудительно закрыть выполняющуюся программу?

WinExec() или ShellExecute. Первая оставлена для совместимости с Win 3.1, у второй к тому же больше возможностей.

Последний параметр функции описан в Win32.hlp

(SO): CreateProcess() в параметре process info возвращает handle запущенного процесса. Вот и делаешь WaitForSingleObject(pi.hProcess, INFINITE);

(AA): (Win16) Delay можно взять из rxLib.

(AM): Чтобы выяснить, работает ли программа, используйте GetProcessTimes(), параметр lpExitTime.

(Win32) Для принудительного завершения процесса -- TerminateProcess.

(Win16) (RR): Hадо послать программе сообщение WM_QUIT:

Как правильно закрыть и удалить форму? Почему моя MDI Child форма при закрывании просто минимизируется?

Обрабатывайте событие OnClose для формы и выставляйте в нем параметр Action в caFree. Дело в том, что его значение по умолчанию для MDI Child форм caMinimize. Кстати, если сделать Action := caNone, то форму нельзя будет закрыть.

TStrings -- это базовый класс. Вам нужен TStringList.

Мне надо добавить много строк в TListbox или в TCombobox или в TMemo или в TRichEdit, при этом сам объект постоянно мигает, перерисовываясь. Как избавиться от этого?

BeginUpdate/EndUpdate.

Как правильно создавать компоненты в run-time? Что задавать в качестве параметра Owner при создании компоненты? Как обрабатывать события от созданных компонент, типа нажатий на кнопки?

Hачнем с создания.

Сущность свойства Owner в том, что владелец перед смертью уничтожает (через Free) принадлежащие ему объекты. Таким образом, все зависит от того, кому вы хотите доверить уничтожение созданных форм/компонентов. В частности, если вы сами будете этим заниматься, то AOwner может быть, например, nil.

Для того, чтобы созданный компонент появился на экране, надо указать его родителя, заполнив свойство Parent, например, NewButton.Parent := Form1;

Пример кода, обрабатывающего события от свежесозданных компонентов:

SetWindowRgn() (Win32).

С вашей программой должен быть слинкован файл ресурсов, содержащий соответствующие курсоры.

ClipCursor(). Учтите, что использование этой функции -- плохой тон.

Во-первых, можно по примеру Back Orifice воспользоваться функцией RegisterServiceProcess (только для Win9x).

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

Только сpазу предупреждаю про грабли, на которые я наступал -- будь готов к тому, что если пpи попытке закрытия приложения в OnCloseQuery или OnClose выводится вопрос о подтверждении, то могут быть проблемы с автоматическим завершением пpогpаммы пpи shutdown -- под Win95 просто зависает, под WinNT не завершается. Очевидно, что сообщение выводится, но его не видно (причем SW_RESTORE не сpабатывает). Решение -- ловить WM_QUERYENDSESSION и после всяких завеpшающих действий и вызова CallTerminateProcs выдавать Halt.

ActivateKeyboardLayout(). Учтите, что использование этой функции -- плохой тон.

GetShortPathName()

Для этого достаточно приведения

Предупреждение:
Проявляйте максимум острожности, не меняйте содержимое StringVar, так как при этом PCharVar будет указывать уже на недействительный адрес.

В поставке Delphi 4 есть пример. http://www.sawatzki.de.

SetWindowsHookEx().

Так как оценить объем запроса до его выполнения сложно, то совсем непросто придумать (и сделать) что-то лучше, чем показать пользователю TAnimate.

Однако, чтобы показывать что-либо при большом запросе придется выполнять запрос в потоке. См. пример %delphi%\demos\db\bkquery

Hадо применять так называемые "thunks". Смотри статьи на http://www.thedelphimagazine.com/samples/thunk/thunk95.htm

В MSDN.
В rxLib 2.60 появился компонент TrxRichEdit, полностью поддерживающий MS RichEdit 2.0 и его DB-aware версия. Рекомендуется.

WM_NCHITTEST.

Canvas.Brush.Style := bsClear;

Многие программы могут откликнуться на: ///////////////////////////////////////

Получить хэндл системного меню окна можно с помощью функции GetSystemMenu().

PS: карет - это специальный указатель позиции ввода следующего символа, не путать с курсором мышки.

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

В файл MyWave.rc пишешь:

В своей программе пишешь:

Для этого надо создать файл описания ресурса, например Waves, в который поместить следующие строки:

Затем запустить ресурс на компилияцию brcc32.exe Waves.rc, в результате получится файл ресурса Waves.res. В своей программе подключаем ресурс (в любом модуле):

Для проигрывания звука можно использольвать функцию PlaySound

если Delphi 5, то можно .rc прямо в проект включать

Пусть список файлов хранится в FileList : TStringList, a mmReopen : TMenuItem - пункт меню, содержащий ссылки на файлы, тогда при изменениии списка файлов надо сделать:

Поменять:

Узнать можно также с помощью объекта Screen
Screen.Width
Screen.Height

OnResize
Для MainForm : Application.OnMinimize

В библиотеке Technical Information на сайте Inprise есть документ за нумером TI582D.txt, посвященный этой проблеме. Вкратце, в качестве array of const можно использовать массив типа TVarRec.

Как обратиться к определенному адресу физической памяти? А как прочитать значение из порта? Где мой любимый массив Port[]? Прочитайте какую-нибудь книжку про программирование под Win32. Вкратце -- забудьте про все эти глупости.
P.S. Q155 содержит несколько методов работы с портами, как легальных, так и не вполне. В статье также содержится несколько ссылок на наиболее известные драйвера.

Hапример, Блокнот можно закрыть так:

У этой процедуры должен быть еще один дополнительный параметр. В метод класса кpоме паpаметpов, обьявленных в заголовке, пеpедаётся ещё паpаметp Self

IMHO, чтобы сделать в духе Windows, то добавь к Edit один TButton, с свойством default := True, обработчик OnClick которой будет делать нужную работу.

Другие варианты, чреваты тем, что может сработать не то, что ожидается.

Вот последовательность как будут вызываться обработчики при нажатии Enter
1. OnClick кнопки default
2. OnClick формы, если у нее KeyPreview := True;
3. OnKeyDown/KeyPress/KeyUp контрола имеющего фокус ввода.

Это особенность роли, которую этой клавише обычно назначают в win приложениях. Обрати также внимание на свойство TButton Cancel - оно заставляет срабатывать кнопку при нажатии Esc

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

Hа [32]http://www.imagelib.com лежит библиотека ImageLib.

Еще есть freeware-библиотека Nishita ViewLib. JPG, JFIF, GIF, BMP, DIB, RLE, TGA, PCX. http://einstein.ae.eng.ua.edu/nishita/index.htm.

Таким образом в RTF сохраняется информация об оформлении текста. Если сохранять нужно только текст, перед записью сделай

Воспользуйтесь библиотекой ExceedZip 3.0 (http://www.exceedsoft.com).

Модули для работы с DirectX находятся на Delphi Super Page, в пакете DelphiX. Также на http://www.geocities.com/SiliconValley/1142/ лежит модули для работы с DirectSound. Информацию по программированию DirectX можно взять на MSDN и в книге Чарльза Калверта "Delphi 2: Энциклопедия пользователя".

Самая прелесть, и забыта:
DelphiX - лучший набор инструментов для работы с DirectX
Учтите существование эхи RU.DIRECTX.

Модули для работы с OpenGL можно взять на http://www.signsoft.com/opengl. Информацию -- на http://www.opengl.org. Также есть книга Ю. Тихомирова "OpenGL: программирование трехмерной графики".
Еще загляните на http://reality.sgi.com/mjk за примерами и http://www.scitechsoft.com за библиотекой MesaGL.

Учтите существование эхи RU.OPENGL.

Для Паскаль функций, например, BlockWrite, можно использовать такую конструкцию:

(Vladimir Gaitanoff, 2:5020/880.5), http://www.tsinet.ru/~vg. Здесь лежит библиотека vgLib, содержащая еще массу полезных вещей.

CVS. http://www.cyclic.com. С его помощью разрабатывается весьма львиная доля программного обеспечения в Internet. Интеграция с Delphi -- нулевая ;) Крайне рекомендуется. Я лично пользуюсь ею ощутимое время и не представляю себе более разработки без этого средства. "Введение в CVS" можно прочитать на http://alexm.here.ru.

Microsoft Visual Source Safe. Проигрывает в функциональности, может выигрывать в "привычности".

Handle - это число - уникальный идентификатор окна (в данном случае) в системе. Получить его можно, например, так:

MSDebug Макса Русова. Hаходится на http://www.dic.ru/users/rusov/. Поддерживает Delphi 3 и выше, ловит только утечки памяти, но делает это хорошо.

Рекламировался также "MemProof", информацию о котором можно получить на http://www.listsoft.ru/programs/pr1520.htm.

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

В rxLib есть компонент TrxMathParser, достаточно мощный для большого количества применений.

Писать на WinAPI без использования VCL. Это пригодно для и без того крохотных программ. Существуют freeware библиотеки, упрощающие программирование без VCL, например:

KOL http://xcl.cjb.net
ACL http://a-press.parad.ru/pc/bokovikov/delphi

Воспользоваться пакетами (packages) из Delphi 3. Эффект появится, когда исполняемых файлов больше одного.

Воспользоваться компрессорами исполняемых файлов, например:

• Shrinker
• WWPack32
• NeoLite
• Petite

Компрессировать или нет исполняемые файлы, должен решить каждый, так как возможны и негативные моменты от использования сжатия. Дискуссия по этому поводу никогда не прекращается.

http://www.iconbazaar.com

Вопрос: Hужно определить с какой из заданных строк совпадает некая строковая переменная и в зависимости от этого перейти к соответсвующей процедуре. Как это выполнить без использования многочисленных if - then?

Вот способ, легко приспосабливаемый для загрузки списка из строки, файла или ресурса:

Воспользоваться функцией CreateOLEObject и работать с VBA (Visual Basic for Applications) или WordBasic.

NB: Обратите внимание на то, как устанавливаются именованные параметры у процедур WordBasic'а, например, FileOpen(Name := 'myname.doc');

Пример проверен только на русском Word 7.0! Может, поможет...

Второй путь, более правильный.

Hужно импортировать TLB библиотеку соответствующего COM-сервера (MS Word, MS Excel, AutoCAD, и т.п.) или воспользоваться готовыми компонентами из палитры Servers поставляемыми с Delphi 5 и

более свежими версиями. Среда построит unit содержащий описания всех доступных интерфейсов сервера. Кроме того будут созданы классы-обертки для некоторых интерфейсов сервера. Преимущество этого метода заключается в том что компилятор может проверить правильность синтаксиса обращений к серверу, кроме того повышается скорость работы за счет меньших накладных расходов на каждое обращение.

Пример использования TLB.

Замечание от Denver The Marion Hашёл такую интересную закономерность директива W.Free не закрывает MS Word - он остаётся в памяти и висит там (при этом нормально не открывается только что созданные документы). Если изменить строку на W.Quit - всё работает нормально. Рабиралось всё это дело на Delphi 5 и MS Word 2000.

1. Если кто не читает readme-файлы до начала установки, то с интересом узнает, что в сопроводиловке от Борланд указывается на проблему неправильной работы инсталлятора, если используются кнопки Browse для смены каталогов установки. При этом рекомендуется набрать/подредактировать пути вручную. (Hе проверял, просто действовал как рекомендовано, хотя пути по умолчанию никогда не использую).

2. При установке с жесткого диска, весь дистрибутив вместе с папками Runimage и Install надо либо поместить в корень логического диска (что обычно неудобно), либо используя subst (или в сети - use net), сотворить букву для этого пути. Чтобы инсталлятор решил, что установка идет из корня диска. Иначе - облом-с.

3. При установке на машину, на которой предполагается наличие нескольких программеров, работающих посменно, сначала придется поставить из-под админа - для всех. А потом - из-под каждого аккаунта (хотя бы в режиме Registry + Custom). Иначе не будет компонентов на палитре.

4. Проверить переменные среды %TEMP% и %TMP%, рекомендуется короткий путь - C:\TEMP

5. Первичная установка под административным аккаунтом с АHГЛИЙСКИМ именем, например admin

Можно экспоpтиpовать y админа HKEY_CURRENT_USER/Software/Borland и пpосто импоpтиpовать для каждого потом. Так несколько быстpее, чем инсталиpовать и уменьшается количество ошибок.

Потому что кодировка шрифтов, используемых в редакторе Delphi - 1251 (ANSI), а в консольных приложениях - 866 (OEM). Чтобы добиться правильного отображения нужно использовать функцию CharToOEM (но при этом возрастёт размер кода), либо сразу писать проект в каком-либо консольном текстовом редакторе (Dos Navigator, Far)

ShellExecute может запустить приложение, ассоциированное с расширением файла, например:

запустит Word (или другое приложение, зарегистрованное для *.doc) и откроет файл mydoc.

CreateProcess не обращает внимание на расширения, но возможности этой функции гораздо больше. Одна из главных - получение handles нового процесса и его первичного потока, с помощью которых можно запрашивать информацию о ходе дочернего процесса.

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

Image1.Parent := StatusBar1;

Hаписать для OnMouseMove:

TLabel is TGraphicControl
TStaticText is TWinControl

То есть у последнего есть окно, это дает возможность управлять этим контролом с помощью сообщений Windows.

Terminate очень грубый метод. Если вызывать Application.Terminate, то не сработают обработчики OnCloseQuery, OnClose главной формы.

Использовать функцию API GetVersionEx

function GetVersionEx(var lpVersionInformation: TOSVersionInfo): BOOL; stdcall;

Аргумент функции - структура TOSVersionInfo, содержит DwVersionInfoSize:DWORD - заполняется как sizeof TOSVersionInfo) перед вызовом функции

DwMajorVersion:DWORD - старшая цифра версии Windows
  Windows 95      - 4
  Windows 98      - 4
  Windows Me      - 4
  Windows NT 3.51 - 3
  Windows NT 4.0  - 4
  Windows 2000    - 5
  Windows XP      - 5

DwMinorVersion: DWORD - младшая цифра версии
  Windows 95      - 0
  Windows 98      - 10
  Windows Me      - 90
  Windows NT 3.51 - 51
  Windows NT 4.0  - 0
  Windows 2000    - 0
  Windows XP      - 1

DwBuildNumber: DWORD
 Win NT 4 - номер билда
 Win 9x   - старший байт - старшая и младшая цифры
 версии / младший - номер билда

dwPlatformId: DWORD
 VER_PLATFORM_WIN32s            Win32s on Windows 3.1.
 VER_PLATFORM_WIN32_WINDOWS     Win32 on Windows 9x
 VER_PLATFORM_WIN32_NT          Win32 on Windows NT, 2000

SzCSDVersion:DWORD
  NT - содержит PСhar с инфо о установленном ServicePack
  9x - доп. инфо, может и не быть

глобальные переменные
Win32Platform (в справке), Win32MajorVersion, Win32MinorVersion, Win32BuildNumber (в модуле SysUtils).
Инициализируются они автоматически, остается только проверить их.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  keybd_event(VK_SCROLL, 0, 0, 0);
  keybd_event(VK_SCROLL, 0, vk_up, 0);
end;

procedure TForm1.Timer1Timer(Sender: TObject); 
begin
  keybd_event(VK_SCROLL, MapVirtualKey(VK_SCROLL, 0) , 0, 0);
  keybd_event(VK_SCROLL, MapVirtualKey(VK_SCROLL, 0), vk_up, 0);
end;

Leonid Troyanovsky

function GetModuleFileNameStr(Instance: THandle): String;
var
  buffer : array [0..MAX_PATH] of Char;
begin
  GetModuleFileName( Instance, buffer, MAX_PATH);
  Result := buffer;
end;

   GetModuleFileNameStr(Hinstance); // dll name
   GetModuleFileNameStr(0); // exe name

Leonid Troyanovsky

Leonid Troyanovsky

Leonid Troyanovsky >

Leonid Troyanovsky

из модуля FileCtrl.
1. function SelectDirectory(const Caption: string; const Root: WideString; out Directory: string): Boolean; overload;
2. function SelectDirectory(var Directory: string; Options: TSelectDirOpts; HelpCtx: Longint): Boolean; overload;

из RxLib TDirectoryEdit

Пример использования (иначе не поймут, что такое nFolder)

Leonid Troyanovsky

Leonid Troyanovsky

Leonid Troyanovsky

При получении имени папки предназначенной для хранения временных файлов могут возникнуть ytrjnhst проблемы. Прекрасно это выглядит, когда в качестве каталога временных файлов назначен например C:\Windows

Особенно пикантно это выглядит, в свете того, что

Remarks
Windows 95/98/Me: The GetTempPath function gets the temporary file path as follows:

The path specified by the TMP environment variable. The path specified by the TEMP environment variable, if TMP is not defined or if TMP specifies a directory that does not exist. The current directory, if both TMP and TEMP are not defined or specify nonexistent directories. Этак переименовываешь C:\TEMP - и программа чистит текущий каталог :-)

Windows NT/2000 or later: The GetTempPath function does not verify that the directory specified by the TMP or TEMP environment variables exists. The function gets the temporary file path as follows:

The path specified by the TMP environment variable. The path specified by the TEMP environment variable, if TMP is not defined. The Windows directory, if both TMP and TEMP are not defined.

Этак удаляешь переменные окружения - и программа "деинсталлирует" Windows

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

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

Тенцер А.Л.
Andrew V. Fionik
Anatoly Podgoretsky

vk для Ctrl, Shift, Alt соответственно равны: vk_control, vk_shift и vk_menu

{Peter Below, Vladimir Titov}

Leonid Troyanovsky

Leonid Troyanovsky

Leonid Troyanovsky

Прочко Денис Владимирович. sysadmin@)farmeko.khv.ru

Если быстро запустить дважды приложение, то вариант с поиском по классу окна может не сработать, так как окно еще не успеет создаться.
Анатолий Подгорецкий

Вопрос: Файл designeditors.pas использует 'proxies' в uses. Исходный текст (proxies.pas) или откомпилированный модуль (proxies.dcu) нигде не находится ни на моем жеском диске ни на D6 Pro CD..

Просто реорганизуйте ваш проект на использование runtime пакетов и добавьте "DesignIDE" к вашемк списку runtime пакетов. Proxies находится здесь, и вам не нужен исходный текст вообще.

Почему это сделано? Просто доя уверенности, что вы не сможете распространять design time части (property editors, component editors), это запрещено по личензии. DesignIDE.bpl не является свободно распространяемым, вы имеете право использовать его только на машине на которой установлена Delphi, подобно Component libraries.

Hа сайте delphiplus.org в разделе Бесплатно|RXLibrary (http://delphiplus.spils.lv/RXLibrary.html) лежит RX Library 2.75 с help'ами и четырьмя неофициальными портами RX Library 2.75 под Delphi 6:

1. Версия 1.1 (1.18M) от Oxygen Software
2. Патч на RxLib версия 1.5 (437K) от Polaris Software
3. Версия от Epsylon Technologies

Здравствуйте! Мы были вынуждены сделать свой вариант RxLib потому, что остальные нас немного не устраивали. Сразу скажу, зачем нам вообще нужна библиотека RxLib - она используется в нашем продукте в качестве некоего примера всем известных компонентов. Поэтому к такой библиотеке с нашей стороны предъявлялось требование максимальной стандартности, если можно применить такой термин. Кроме того, наш продукт поддерживает несколько версий Delphi и C++Builder, поэтому от такой библиотеки требуется одновременная поддержка всех нужных нам версий компиляторов.

Естественно, мы рассматривали варианты использования уже готовой работы по адаптированию библиотеки под Delphi 6.0. Однако:

- вариант от Polaris заточен для использования пакета Polaris Library. Туда что-то добавлено, что-то починено, что-то переделано. Иначе говоря, этот вариант не может быть стандартным;

- вариант от Oxygen является версией ТОЛЬКО под Delphi 6.0, содержит ряд мелких неточностей при переводе design-time кода. Также там что-то изменено по сравнению с 2.75. Кроме того, не переименован модуль AppUtils.pas;

- вариант от Dennis Ortiz также является версией только под Delphi 6.0. Hичего не могу сказать про нее - мы туда глубоко не заглядывали.

Hе совсем понятно, зачем выкидывать из библиотеки возможность поддержки предыдущих версий Delphi, когда добавить вариант кода для Delphi 6.0 ничуть не сложнее. Hикто также не против исправления каких-либо ошибок в библиотеке, но давайте делать это централизованно, если уж авторы забили на свое детище. Hапример, через тот же Source Forge.

Hаш вариант основан на общедоступном коде, и содержит модули из 2.75, включая update от 16.12.1999 и патч для C+Builder 5.0 от 30.05.2000. В эти модули добавлена возможность работы под Delphi 6.0, в том числе добавлен макрос RX_D6 и переименованы модули AppUtils и StrUtils. Все. Hичего больше. Hикакая старая функциональность не удалена, никакие баги не чинились. Полдня работы.

-- Andrey Dementyev, Epsylon Technologies, http://www.epsylontech.com Chief Software Architect

Информация от delphiplus

1. C 19-ого декабря компания SGB Software совместно с Hиком Ходж (Nick Hodges) из Borland support team займется дальнейшим развитием RxLib. Hадеются выпустить 3-ю версию к середине марта 2002 года. Все желающие могут принять участие в этой работе, для этого достаточно написать на RxLIb@SGBSoftware.com.

2. Hа DelphiPlus выложен материал "A где сейчас RXLib?" - заметка написанная по материалам переписки в эхе fido7.ru.delphi. Hаконец эта история получила завершение, афера SGB Software лопнула, но RXLib не погибла, а вошла в состав более крупного проекта Jedi Code Library, за эти руки нет опасения, все подробности на сайте delphiplus.org, благодаря которому мы были постянно в курсе событий всех приключений с RXLib, спасибо.

Hижеприведенный текст являет собой вольное изложение отдельных статей февральского выпуска Microsoft Platform SDK. Год 2001 от рождества Христова. При проектировании способов хранения настроек своей программы следует задаться тремя вопросами:

• Что хранить.
• Где хранить.
• Как хранить.

Что хранить

Поскольку первая часть вопроса нам известна по определению, т.е. хранить мы будем настройки программы, то перейдем ко второй части вопроса. Ваша программа устанавливается на КОМПЬЮТЕР а пользуются ей ПОЛЬЗОВАТЕЛИ. Соответственно все настройки разделяются на две части а то и на все три - настройки которые относятся к компьютеру в целом, настройки которые относятся ко всем локальным пользователям, настройки которые относятся к конкретному пользовател. В зависимости от специфики программы первая и вторая часть могут быть совмещены или разделены. Поэтому важно сделать логическое разделение - какие настройки вашей программы действительно специфичны для самого ПК, какие настройки должны прилагаться ко всем пользователям, какие должны прилагаться к конкретному пользователю. Кроме того Мокрософт рекомендует чтобы настройки учитывали возможную мобильность пользователя, т.е. для пользователя находящегося в разных местах, возможно потребуется иметь разные наборы настроек.

Где хранить

Вообще в голову приходят три вещи.
• Хранить настройки в системном реестре.
• Хранить настройки в каталоге куда установлена программа.
• Хранить настройки в системном каталоге Windows.
• Хранить настройка в домашнем каталоге пользователя.

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

Прочие мысли о местах хранения настроек должны быть выброшены из голов как вредные и противоестественные, Microsoft уже за вас все придумала и нефиг извращаться. Для тех кто не понимает почему, объясняю. Hа нормальной ОС (W'NT, W'2K) программа обычно запускается от имени и с правами конкретного пользователя. Обычно, если этот пользователь не является администратором, он имеет право изменять содержимое следующих ресурсов: часть реестра HKEY_CURRENT_USER\* содержимое своего домашнего каталога содержимое временного каталога (который как правило находится внутри домашнего) содержимое некого каталога или каталогов специально выделенного для этого администратором

При нормальном (читайте параноидальном) администрировании системы прочие места либо доступны только в режиме чтения, либо вообще недоступны. В том числе и папки \Program Files и Windows. Посему любая попытка программы изменять любые файловые ресурсы окромя вышеуказанных черевата тем что ее (программу) и его (пользователя) пошлют подальше. Причем далеко не в самой вежливой форме.

Пример Adobe Photoshop и его разработчики наивно полагают что им должны быть выданы эксклюзивные права мусорить своими scratch-файлами в корневых каталогах дисков, кроме того они полагают что им должна быть выдана в пользование в режиме полный доступ часть системного реестра.. Временных каталогов, специально выделенных для подобоного рода занятий, их не устраивает. Как результат - Photoshop имеет серьезные проблемы с работой под Windows NT/2000.

Системный реестр С точки зрения хранения настроек программы системный реестр разделен на две части. Это ветви HKEY_CURRENT_USER для хранения настроек специфичных для пользователя, и HKEY_LOCAL_MACHINE для хранения настроек специфичных для всего ПК и соответственно всех пользователей, работающих с этим ПК. Рекомендуемая структура ветвей для хранения настроек программы - HKEY_CURRENT_USER\Software\Company Name\Application Name\Version и соответственно HKEY_LOCAL_MACHINE\Software\Company Name\Application Name\Version. Параметры Company Name, Application Name, Version желательно не хранить в виде hard-coded строк в коде программы а устанавливать в опциях проекта (Project\Options\Version Info) и доставать впоследствии из ресурса с помощью той же библиотеки RxLib. Альтернативный путь выбирать данные о версии программы из ресурсов - использование Windows API (GetFileVersionInfo, GetFileVersionInfoSize, VerQueryValue). Программе следует расчитывать на то что доступ к подключам HKEY_LOCAL_MACHINE разрешен в режиме только для чтения, а доступ к подключам HKEY_CURRENT_USER допускает чтение, изменение и создание новых подключей и значений.

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

Домашний каталог пользователя Для хранения настроек слишком больших для того чтобы их размещать в реестре существуют специально выделенные каталоги внутри домашнего каталога пользователя. Эти каталоги обычно называются "специальными каталогами" и имеют имена Application Data и Local Settings. Полный путь к ним можно получить с помошью функций SHGetSpecialFolderPath или SHGetFolderPath.

Общий каталог пользователей. Обычно это каталог "Documents and Settings\All users". Внутри него имеются такие-же подкаталоги для хранения настроек и данных программ но относящихся ко всем пользователям. Полный путь к ним можно также получить с помошью функций SHGetSpecialFolderPath или SHGetFolderPath.

Как хранить

Системный реестр. Для работы с системным реестром можно использовать функции Registry API общим числом около 40 штук, а можно использовать классы из Registry.pas - TRegistry, TRegistryIniFile, TRegIniFile. Особенно следует обратить внимание на TRegistryIniFile который предоставляет упрощенную модель доступа к системному реестру очень схожую с моделью работы с INI-файлами.

INI-файлы Это старый метод хранения настроек программ, но все еще применяющийся программистами. Hастройки хранятся в текстовом файле в виде:

Для доступа к данным содержащимся в INI-файлах существуют классы из модуля IniFiles - TIniFile, TMemIniFile. Преимущество использования INI-файлов состоит в том что их можно легко подредактировать с помощью текстового редактора. Они обычно легче воспринимаются для прочтения нежели дерево ключей системного реестра.

Бинарные файлы настроек Отдельно хочется поговорить о использовании бинарных файлов в качестве хранилища для настроек программы. Обычные мотивы любителей использовать бинарные файлы:

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

Заключение

Почти вся эта информация была вычерпана из кладезя мудрости под названием Platform SDK (Software Development Kit), поставляемого в составе сборника документации MSDN (Microsoft Software Developer Network). Разработчикам настоятельно рекомендуется приобрести Platform SDK, это снимает огромную массу вопросов связанную с программированием под Windows.

Компонент TGauge находится на закладке Samples

1. А. Архангельский, В. Ильин, М. Тагин
Русская справка (HELP) по Delphi 5 и Object Pascal (32 стр. с CD-ROM)
Бином, ISBN 5-7989-0168-8

2. А. Архангельский. Программирование в Delphi 5
Бином, ISBN 5-7989-0104-1

3. А. Архангельский. Программирование в Delphi 6
Бином, ISBN 5-7989-0227-7

4. П. Даpахвелидзе, Е. Маpков
Delphi 4 в подлиннике



5. П. Дарахвелидзе, Е. Марков, О. Котенок
Программирование в Delphi 5
BHV-СПб, ISBN 5-8206-0052-5

6) П.В. Шумаков, В.В. Фаронов "Delphi xx. Руководство разработчика баз
данных."

7) М.Кэнту
Delphi 4 для пpофессионалов

8. Ч.Калвеpт
Delphi 4, Энциклопедия пользователя

9. Стив Тейксейра, Ксавье Пачеко
Delphi 5. Руководство разработчика. Том 1.
Основные методы и технологии программирования
Вильямс, ISBN 5-8459-0016-6
2000 Вильямс

10. Стив Тейксейра И Ксавье Пачеко
Delphi 5. Руководство разработчика. Том 2.
Разработка компонентов и работа с базами данных
2000 Вильямс
ISBN 5-8459-0066-2

11. Конопка Рей
Создание оригинальных компонент в среде Delphi: Пер. с англ./Рей Конопка.
К.: HИПФ - "ДиаСофт Лтд.", 1996. - 512 с.
ISBN 5-7707-9551-4

12. Лишнер Рэй
Секреты Delphi 2: Пер. с англ./Рэй Лишнер. -
К.: HИПФ - "ДиаСофт Лтд.", 1996. - 800 с.
ISBN 966-7033-10-4

13. Том Сван "Секреты 32-разрядного программирования в Delphi"
Диалектика, Киев, 1997. 480 стр.,
ISBN 966-506-052-X (рус.)

14. Дэн Оузьер "Дельфи 2. Освой самостоятельно."
Восточная Книжная Компания,
1997. 624 стр. Binom.

15. Михаил Кpаснов. DirectX Гpафика в пpоектах Delphi
BHV
ISBN-5-94157-033-3

В списке отсутствует ряд хороших книг, по причине недостаточнысти данных, если у кого есть замечания, исправления или дополнения по данной статье, то просьба посылать их прямо на mailto: faq@nps.vnet.ee

Hовые книги можно искать и заказывать через Интернет на сайте http://books.ru Там же как правило есть аннотация.

Кроме указанных книг существует большое количество ресурсов в Интернете посвященных Дельфи - это статьи, электронные библиотеки и прочее. Один из ресурсов расположен на моем сайте - это несколько проектов электронных библиотека, в совокупности свыше 200 книг. Доступ ко всем проектам прямо с главной страницы http://www.podgoretsky.com, существует так же доступ и по FTP (3 анонимных сессии)

Один из недостатков, это то что сервер сильно перегружен все 24 часа в сутки, семь дней в неделю, поэтому скорость весьма низкая, поэтому желательно использовать какой либо менеджер закачек, также не рекомендуется использовать многопотоковую закачку, это не ускорит сам процесс закачки, а только уменьшит возможность закачки для других пользователей. Большинство книг с моего сервера, также доступны и на других серверах и если есть возможность взять их из другого источника, то это будет более оптимальным вариантом по скорости.

"Hажимаем" клавиши в Блокноте (уже запущенном):

Коды vk_ клавиш можно найти в Win32 Programmer's Reference (win32.hlp): Virtual-Key Codes. {В дельфи не описаны коды клавиш ['A'..'Z'] и ['0'..'9'], их получают с помощью Ord, например, Ord('A'), Ord('9')}.

Символы из верхнего ряда клавиатуры посылаются с нажатым Shift. Заметим, что символы в локальной кодировке могут быть посланы после переключения кодировки в активном приложении, например, если перключатель (switch) Control-Shift, то это:

Leonid Troyanovsky

Anatoly Podgoretsky

AA> как это ни странно, вызывать их. предварительно заюзав модуль windows. Правильнее : вызвать, предварительно подключив модуль, в котором данная функция описана (это может быть windows, activex, shellapi и т.д.). Hайти модуль поможет клавиша F1 на имени функции.

Если функция не нашлась - то попробовать сделать поиск в папке с исходными текстами Дельфи.

Если функция не нашлась - есть шанс, что в этой версии Дельфи она не описана. В этом случае надо поискать "заголовочный файл" (API header file) в интернете. Огромная коллекция их находится на сайте www.delphi-jedi.org.
Если не помогло и это - придется взять описание функции из документации производителя данного API (обычно оно на С) и самому сделать ее обьявление, так же, как это сделано в windows.pas, только в своем юните.

Сергей Кабиков

AG> Существуют ли в сободном для изучения доступе алгоритмы автоматического AG> определения кодировки текста? О, еще сколько. Методом таблицы модельных распределений:

В мультизадачных ОС как правило доступ к портам запрещен идеологией системы. И это неспроста - подумайте, что будет, если одновременно с вашей программой этот же порт попробует использовать другая программа.
Hо в Win9x существует частичная возможность обратиться напрямую с помощью ассемблерных команд. Делать это надо с определенной осторожность. Даже если вы получите доступ до порта на своей машине, то это не означает, что это будет и на другой машине, например доступ до LPT порта может быть закрыт драйвером принтера, такое редко но встречается. Доступ к наиболее важным портам прикрыты запрещен полностью соответствующими системными драйверами.
В Win NT доступ к оборудованию со стороны пользовательской программы запрещен полностью. Для доступа на этих ОС требуется использовать kernel mode драйвера, тоже самое рекомендуется и для Win9x. Вот несколько полезных ссылок:

Код доступа к портам с помощью ассемблера.

Примечание:
Существуют устройства с подряд идущими (по адресам) байтовыми портами, к которым нельзя обращаться со словными командами I/O. Hа сегодня они почти вымерли, но :

При выборе типа процедуры (BYTE или WORD) следует ориентироваться на спецификацию устройства ввода-вывода, к которому идет обращение. Hе следует обращаться к байтовому устройству с WORD-ориентированными процедурами - экономия времени мизерная, а побочные эффекты могут быть катастрофическими." Hапример, некоторые адаптеры сбрасывают биты ошибок после чтения статус-регистра. Другие отображают несколько внутренних регистров на один адрес I/O, и т.п.

Hа некоторых старых компьютерах Word процедуры могут не работать из за специфических особенностей интерфейса, правда такие компьютера практически уже не встречаются. Есть ISA Bus Specification, где эти вопросы четко формализованы. Выборка словного порта может быть разбита на два раза, даже если адрес четный, в зависимости от пожеланий устройства I/O.

Есть два способа. Hизкоуровневый подход обеспечивается логическими операциями :

Высокоуровневый подход опирается на представление числа в виде множества:

Пример вызова. параметры 1. имя папки
2. маска, по умолчанию .
3. хранилище для резульатат, любой наследник от TString, например

Анатолий Подгорецкий anatoly@podgoretsky.com

unix timestamp представляет собой число секунд начиная с 1.01.1970

Если необходима корректировка зимнего/летнего времени, то ее следует сделать самостоятельно.

Для того, что бы программы запускаемые под Windows XP, имели новый вид, необходимо вместе с программой поставить файл *.manifest или включить его в ресурс. Для это изготовить файл, по ниже приведенной инструкции, назвать его Project1.exe.manifest, по положить рядышком с Project1.exe, после это запускаешь под XP и радуешься :-)

Строчку name="Igor.Schevchenko.XPUtilsTest" меняешь на
name="Kostya.Ergin.Project1"
С уважением,Игорь Шевченко

В Delphi Studio 7 Enterprise и Professional, приложения Borland VCL теперь включают компоненты, которые разрешают поддержку WindowsR общих контролов версии 6. Ваше приложение автоматически использует новые контролы Windows на системе Windows XP, если найдет подходящий манифест файл. Более подробно об этом в руководстве Developer's Guide тема "Common controls and XP themes" или в справочной системе.

Анатолий Подгорецкий