Delphi IDE, компилятор, отладчик, редактор

Как сделать свои собственные сообщения при компилляции?

2012-09-18T16:38:09+07:00

Формат команды:

{$MESSAGE HINT|WARN|ERROR|FATAL 'text string' }

Например, добавление следующих строк приведёт к появлению:

Code:

{$MESSAGE 'Появился новый hint!'}

{$MESSAGE Hint 'И это тоже hint!'}

{$MESSAGE Warn 'А это уже Warning'}

{$MESSAGE Error 'Эта строка вызовет ошибку компиляции!'}

{$MESSAGE Fatal 'А это фатальная ошибка компиляции!'}

Подробнее...

Как узнать версию компилятора?

2012-09-18T16:43:29+07:00

Иногда надо выполнить разный код в зависимости от версии Дельфи, особенно актуально это при разработки компонентов и модулей, которые используются в разных приложениях.

В Дельфи предопределены специальные константы компиляции для этого:

Ver80 - Дельфи 1

Ver90 - Дельфи 2

Ver93 - С Buider 1

Ver100 - Дельфи 3

Ver110 - С Buider 3

Ver120 - Дельфи 4

Ver125 - С Buider 4

Ver130 - Дельфи 5

Ver140 - Дельфи 6

Ver150 - Дельфи 7

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

Code:

procedure TForm1.Button2Click(Sender: TObject);

{©Drkb v.3(2007): www.drkb.ru,

®Vit (Vitaly Nevzorov) - nevzorov@yahoo.com}

const Version=

{$Ifdef Ver80}'Дельфи 1';{$EndIf}

{$Ifdef Ver90}'Дельфи 2';{$EndIf}

{$Ifdef Ver100}'Дельфи 3';{$EndIf}

{$Ifdef Ver120}'Дельфи 4';{$EndIf}

{$Ifdef Ver130}'Дельфи 5 ';{$EndIf}

{$Ifdef Ver140}'Дельфи 6';{$EndIf}

{$Ifdef Ver150}'Дельфи 7';{$EndIf}

begin

ShowMessage('Для компиляции этой программы был использован '+Version);

end;

Автор:Vit (www.delphist.com, www.drkb.ru, www.unihighlighter.com, www.nevzorov.org)

Взято с Vingrad.ruhttps://forum.vingrad.ru

Какие есть директивы компилятора?

2012-09-18T15:01:21+07:00

{$I+} и {$I-} - директивы контроля ввода/вывода {$M} и {$S} - директивы, определяющие размер стека {$M+} и {$M-} - директивы информации времени выполнения о типах {$Q+} и {$Q-} - директивы проверки переполнения целочисленных операций {$R} - директива связывания ресурсов {$R+} и {$R-} - директивы проверки диапазона {$APPTYPE CONSOLE} - директива создания консольного приложения 1) Директивы компилятора, разрешающие или запрещающие проверку утверждений. По умолчанию {$C+} или {$ASSERTIONS ON} Область действия локальная Директивы компилятора $C разрешают или запрещают проверку утверждений. Они влияют на работу процедуры Assert,используемой при отладке программ. По умолчанию действует директива {$C+} и процедура Assert генерирует исключение EAssertionFailed, если проверяемое утверждение ложно. Так как эти проверки используются только в процессе отладки программы, то перед ее окончательной компиляцией следует указать директиву {$C-}.

Подробнее...

Предопределённые константы условной компиляции

2012-09-18T16:48:19+07:00

Версии компилятора

Ver80 - Дельфи 1

Ver90 - Дельфи 2

Ver93 - С Buider 1

Ver100 - Дельфи 3

Ver110 - С Buider 3

Ver120 - Дельфи 4

Ver125 - С Buider 4

Ver130 - Дельфи 5

Ver140 - Дельфи 6

Ver150 - Дельфи 7

Ver160 - Дельфи 8

KYLIX - Kylix 1

KYLIX2 - Kylix 2

KYLIX3 - Kylix 3

KYLIX4 - Kylix 4

Платформа: (определена для Дельфи 6 и выше)

Linux

MSWindows

Среда разработки:

DELPHI

BCB

Delphi 4 виснут при запуске. Видеокарта S3 Virge?

2012-09-14T20:47:03+07:00

Code:

REGEDIT4

[HKEY_CURRENT_CONFIG\Display\Settings]

"BusThrottle"="on"

Если не помогает, то попробуйте добавить в system.ini:

[Display]

"BusThrottle"="On"

Эта проблема устранена в Delphi 4sp3.

Надо уменьшить степень аппаратного ускорения графики в свойствах компьютера

Hidden or missing IDE

2012-09-15T02:24:25+07:00

Occasionally in Delphi 5 the IDE will 'disappear'. This is to say you will launch Delphi, and most or all of your IDE will not be visible. Delphi is clearly running and working, as you can still use your hot keys and run and compile a program, you just can't see such useful items such as the object inspector or your component tool bar. This is caused by Delphi saving bogus information in its desktop preference files, or '.dsk' files. Delphi saves information about your environment options and settings in these files. In order to see your IDE again, all you need to do is delete these offending files. This will in no way harm Delphi or your project, as Delphi will dynamically generate these files as it needs them. You will however lose any environment settings that you had set previously.

IDE highlighting the incorrect line

2012-09-16T03:19:41+07:00

On one project, the IDE insists on highlighting the incorrect line for different conditions. For example, when a syntax error is highlighted, the line above the error is highlighted or when I set breakpoints by choosing a blue dot in the gutter, it does not "line up" with the text line. How can I fix this? This condition is usually caused by opening the file in a different editor than the editor provided by the IDE. If a line of code is somehow modified and then saved back to the disk using only a carriage return for a line terminating character (instead of a carriage return + line feed sequence), the IDE may get confused. To fix the problem, load the file into an editor that will save each line with a carriage return + line feed sequence. Примечание от Vit: ошибка исправлена в Дельфи 7.

Where are my components?

2012-09-15T02:21:07+07:00

Windows NT and 2000:

Most likely Delphi was installed by an administrator or a user with administrator rights and the user currently logged on does not have administrator rights. The component library is failing to load because it does not have the registry keys available that indicate where the packages are located. Install first as Admin, then do a 'Registry Settings Only' install for each user to get all the necessary DLL's and registry key entries to run Delphi under a specific user profile.

To do this login as the user and run the Delphi install. Around 3 screens in you'll get to the screen where you need to choose the install directories. At the bottom of this screen is a check box to select for Registry Settings Only. Complete the install as usual. It should be much faster since no files are copied.

If it looks like the components are there but the bitmap images are missing then try unistalling and reinstalling each package. This can be done very easily by going into the Delphi menu option Component | Install Packages. Uncheck each of the packages and then check it again. Say "Yes" to any message boxes that appear asking about the removal of related packages. I recommend you start by removing "Borland Database Components" since this will remove several others as well.

В основном Help'е в Delphi не работает индекс по Win32?

2012-09-15T01:45:57+07:00

- в /help/delphi3.cfg добавить строку типа

:index Win32=Win32.hlp

она должна быть добавлена перед строкой

:Link win32.hlp

- стереть delphi3.gid

- запустить Help и получать удовольствие

В delphi3.cnt тоже нужно строчку добавить:

:include win32.cnt

Взято с сайта https://blackman.wp-club.net/

Исчезает главное меню Delphi, почему?

2012-09-15T02:08:38+07:00

Дельфи до 6й версии неправильно распознают профили пользователей в 2000/XP. Надо установить Дельфи под тем пользователем под которым будете его использовать.

Автор Mikel

Взято с Vingrad.ruhttps://forum.vingrad.ru

Проблемы регистрации Дельфи

2012-09-16T03:24:30+07:00

После горячейперезагрузкикомпьютера Delphi 7 призапускесталавыдаватьтакоеокошечко:

Переустановканепомогла. Подскажите, какрешитьпроблему.

1. СфайломчисткиреестрасоседствуетпрограммарегистрацииD7Reg.exe. Онаипозволяетввестиключзаново.

2. Вообщеможнопростоодинразсохранитьфайлыиз c:\Documents and Settings\username\.borland\ ижитьспокойно

Взято из https://forum.sources.ru

Способы уменьшения размера Exe файлов полученных с помощью Дельфи?

2013-08-14T02:07:19+07:00

Generally, EXE files created with Delphi are larger than EXE files created with another programming language. The reason is the VCL. (Sure, VCL has many advantages...)

There are several ways to reduce a EXE's size:

01) Use a EXE-Packer (UPX, ASPack,...)

02) Use KOL.

03) Write your application without VCL

04) Use the ACL (API Controls Library)

05) Use StripReloc.

06) Deactivate remote debugging information and TD32.

07) You might want to put code in a dll.

08) Don't put the same images several times on a form. Load them at runtime.

09) Use compressed images (JPG and not BMP)

10) Store less properties in DFM files

(See Link below "How To Make Your EXE's Lighter")

11) Use the TStringList replacement by ~LOM~

Use the Minireg - TRegistry replacement by Ben Hochstrasser

Подробнее...

Data segment too large error

2012-09-25T17:43:45+07:00

Data segment too large error

Typed constants are added to the Program's data segment. Untyped constants are added to the code segment of the application only if they are used. Unless you are going to reassign the value of a typed constant, you should use an untyped constant instead. Typed constants should be replaced with initialized variables to be compatible with future versions of the compiler.

Example:

Code:

{This adds the constant to the data segment}

const SomeTypedString : string = 'Test';

const SomeTypedInt : integer = 5;

{This adds the constant to the code segment if used}

const SomeUnTypedString = 'Test';

const SomeUnTypedInt = 5;

Delphi Run-Time Error Codes

2012-09-18T17:07:29+07:00

Delphi's online help documentation seems to miss the run-time error codes. I usually looked them up in my old Borland Pascal for Windows help file - now they are here for fast access:

1 Invalid function number

2 File not found

3 Path not found

4 Too many open files

5 File access denied

6 Invalid file handle

12 Invalid file access code

15 Invalid drive number

16 Cannot remove current directory

17 Cannot rename across drives

100 Disk read error

101 Disk write error

102 File not assigned

103 File not open

104 File not open for input

105 File not open for output

106 Invalid numeric format

200 Division by zero

201 Range check error

202 Stack overflow error

203 Heap overflow error

204 Invalid pointer operation

205 Floating point overflow

206 Floating point underflow

207 Invalid floating point operation

210 Object not initialized

211 Call to abstract method

212 Stream registration error

213 Collection index out of range

214 Collection overflow error

215 Arithmetic overflow error

216 General protection fault

Взято с сайтаhttps://www.delphifaq.com

Duplicate resource error

2012-09-20T20:12:48+07:00

When I try to add a resource to my project's .res file, I get a "Duplicate Resource" error when linking. The resource I have added is a unique resource. How can I successfully add the resource to my project?

The projects resource file is generated by the IDE wizard, and is not intended to be modified. To add additional resources to your project, create a separate resource file with a unique name that does not conflict with either the project or any of the unit names. Then to add the resource file to Delphi, simply add the following line to any unit file in the project:

{$R MyRes.Res}

(where MyRes.Res is the name of the resource file).

To add the resource to Borland's C++ Builder, add the resource

from the project manager.

EOleSysError - как бороться?

2013-03-22T17:06:24+07:00

Перед тем как Дельфи сможет использовать любые ActiveX/COM (в том числе и ADO компоненты) должна быть выполнена строка Application.Initialize - которая инициализирует использование COM. Если пишется DLL или консольное приложение, которые не имеют объекта Application, то надо просто добавить в Uses ещё один модуль: "oleauto"

Error reading symbol file

2013-03-22T16:53:15+07:00

This usually occurs when you move a project to another drive or directory. Simply deleting the project's .DSM and .DSK files should remedy the situation.

Error: Interface not supported

2013-03-22T17:06:24+07:00

I receive an "Interface is not supported" error when trying to use an interface.

Verify that STDVCL32.DLL and your type library are registered. If casting an interface, you must be using DCOM and the type library must be registered on the client.

Error: RPC Server is unavailable

2013-03-22T17:06:24+07:00

The error is usually caused because the server can't be located. Make sure you can ping the server machine using the string you typed into the ComputerName property of the TRemoteServer. You might also want to try using an IP address instead in case there is some problem with your DNS configuration or the hosts file. Try setting the "Default Authentication Level" to (Run DCOMCNFG on the server to do this.) Lastly, check the Microsoft Developer's Network on the Web for the latest information on this Microsoft transport. The MSDN can be located at the time of the writing at www.microsoft.com/msdn.

Stack Overflow, Runtime error 202

2013-03-22T17:05:09+07:00

Stack Overflow, Runtime error 202

Simply put, stack overflows are caused by putting too much on the stack. Usually, they are caused by recursive procedures that never end. A good example would be creating an event handler for the TMemo's onChange event, and making a change to the Memo during the processing of the event. Every time the OnChange event gets fired, another change is made, so the OnChange event gets fired again in an almost endless loop. The loop finally ends when the stack overflows, and the application crashes.

Here is an example of a recursive procedure:

Code:

procedure RecursiveBlowTheStack;

begin

RecursiveBlowTheStack;

end;

Sometimes, a stack overflow is caused by too many large procedures. Each procedure calls another procedure, until the stack simply overflows. This can be remidied by breaking up large procedures into smaller ones. A good rule of thumb in regard to a procedures size is if the procedure's source code takes up more than a screen, its time to break it down into smaller procedures.

Подробнее...

Как мне избавиться от выскакивающего окна CPU при ошибках?

2012-09-18T17:08:41+07:00

HKEY_CURRENT_USER\Software\Borland\Delphi\4.0\Debugging

ViewCPUOnException=0

Как отловить ошибку?

2013-03-22T17:06:24+07:00

Code:

Try

{здесь вы пишите код в котором может произойти ошибка}

Except

{здесь вы пишите код который выполнится если ошибка произойдёт, если ошибки не будет то этот код не выполняется}

End

Вот как будет выполняться код:

Подробнее...

Как перехватить сообщение об ошибке?

2013-03-22T17:06:24+07:00

Code:

{©Drkb v.3(2007): https://delphi-hlp.ru}

Try

{здесь вы пишите код в котором может произойти ошибка}

Except

on e:Exception do Shwomessage(e.message);

End

Как предотвратить утечки памяти при возникновении ошибок?

2013-03-22T17:06:24+07:00

Используйте конструкцию

Code:

{©Drkb v.3(2007):https://delphi-hlp.ru}

Try

{здесь вы пишите код в котором может произойти ошибка}

Finally

{здесь вы пишите код который выполнится в любом случае - хоть произойдёт ошибка, хоть нет}

End

Например, это часто применяется во избежание утечек при динамическом распределении памяти:

Code:

{©Drkb v.3(2007): https://delphi-hlp.ru}

t:TStringList;

...

t:=TStringList.create; //распределили память под объект t

Try

{здесь работаем с переменной t}

Finally

t.free;//память выделенная под объект t всегда будет освобождена

End

Как сгенерировать свою ошибку?

2013-03-22T17:06:24+07:00

Code:

{©Drkb v.3(2007): https://delphi-hlp.ru}

raise Exception.Create('Это моя ошибка! Сам что хочу то и пишу здесь!')

Примечание: в отличие от других объектов, объекты типа Exception или других классов, унаследованных от Exception не требуют вызова деструкторов или любых других действий по освобождению памяти после их создания.

Почему возникает ошибка Access Violation?

2013-03-22T17:06:24+07:00

Ошибка "Access Violation" возникает, когда идёт обращение к памяти к которой обращение запрещено. Это возможно во многих случаях, но наиболее типичные ситуации я попытаюсь перечислить:

1) Обращение к не созданному объекту.

Code:

var e:TEdit;

begin

e.text:='Hello world!';

end;

В данном случае объект e ещё не создан и идёт обращение к памяти, которая ещё не выделена.

Подробнее...

Список префиксов Internal Error

2013-03-22T17:06:24+07:00

Иногда выскакивают ошибки типа "Internal Error SY424", вот расшифровка префиксов:

B : debugger

BC : debugger

BR : browser

C : codegen

CM : command line version of the compiler

D : parser

Подробнее...

Delphi 7. Отличия и особенности.

2013-08-14T01:39:14+07:00

Отличий немного, а стоит ли переходить это скорее всего надо по обстоятельствам решать.

1) Исчезли компоненты NetMaster и изменился репортинг - если в поддерживаемых/разрабатываемых программах они используются то переход будет не столь простым

2) Очень многие третьесторонние библиотеки пока не имеют версий для 7х Дельфи - следовательно если они используются то надо ждать

3) Очень много добавилось для поддержки Web/Internet/Soap/XML и т.п. если используются новые интернет технологии то быстрый переход на Дельфи 7 может быть весьма оправдан.

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

5) Если Вы разрабатываете компоненты, то естественно нужна поддержка и этой версии

Автор:Vit

Взято с Vingrad.ruhttps://forum.vingrad

и кстати ещё исчезли компоненты TclienSocket и TServerSocket

Краткая история Delphi

2013-08-14T01:37:17+07:00

Delphi - это потомок Турбо Паскаля, который был выпущен для операционной системы CP/M в 1983 году. В феврале 1994 года Турбо Паскаль был перенесен на операционную систему MS-DOS.

На раннем этапе развития компьютеров IBM PC, Турбо Паскаль являлся одним из наиболее популярных языков разработки программного обеспечения - главным образом потому, что это было вполне серьезный компилятор, который, включая компилятор, редактор и все остальное, стоил всего $19.95 и работал на машине с 64 Kb оперативной памяти.

Под Windows - Турбо Паскаль был перенесен фирмой Borland в 1990 году. А самая последняя версия Borland Pascal 7.0 (имеющая теперь такое название), не считая Delphi, вышла в свет в 1992 году.

Разработка Delphi началась в 1993 году. После проведения beta-тестирования Delphi показали на "Software Development '95". И 14 февраля 1995 года официально объявили о ее продаже в США. В торговлю Delphi попала спустя 14 дней, 28 февраля 1995 года

Новые позможности языка в Delphi 2006

2013-08-14T01:48:05+07:00

В Delphi 2006 появилосьмногорасширенийязыка, втомчислеперегрузкаоператоров, "Class-like" записи. Чтопозволяетсоздаватьсобственныетипыданных (неклассы, аименнотипызначения)! Длядемонстрацииэтихвозможностейянаписалтип TDate дляработысдатами.

Подробнее...

Переход от Delphi 7 к Developer Studio 2006 - сравнивая компоненты

2013-08-14T01:44:06+07:00

Переходот Delphi 7 к Developer Studio 2006 - сравнивая компоненты

Каждаяверсияпродуктапредставляетновыевозможности, втожевремячтотоможетбытьудаленокакустаревшееилинеиспользуемоеи Borland Delphi или C++Builder неявляютсяисключением.

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

10/10/2005 Borland представилновуюверсию Borland Delphi - Borland Developer Studio 2006. Отличительнойособенностьюсталаинтеграция C++ какноваюперсоналитив IDE. Наданныймоментэтотолькопредварительныйварианткода.

Втечениипоследнихлетястаралсяотслеживатьпрогрессиизменениявспискекомпонентовдоступныхв Delphi итеперьнасталовремявключить C++Builder.

Примечание:Когда"*"присутствуетвкакойлибоколонкеэтозначитчтополе "Примечание" содержитдополнительнуюинформацию.

Подробнее...

Проблема использования компонентов в D6/7 от предыдущих версий

2013-08-14T01:26:47+07:00

Решение в случае ошибок компиляции пакетов типа: Missing unit 'Proxies.pas' и MissingDsgnIntf.pas

1) Сначала заменить

uses DsgnIntf;

на

uses DesignIntf, DesignEditors;

2) Затем

Добавить DesignIde.dcp в лист требуемых модулей

Взято с сайтаhttps://www.delphifaq

Переименованиемодулейнерешитпроблемы 'Proxies.pas' Этапроблемавозкаетиз-затого, чтосамикомпонентыиредакторысвойствпомещаютводинпакет.

Этонехорошо, нов D5 инижепроходило, аначинаяс D6 уженепроходит.

Пакетразбиваетенадва: run-time и design-time.

RT-пакетсодержитТОЛЬКОкодсамихкомпонентовибольшеНИЧЕГО. Ниодинегомодульнедолженссылатьсяв uses нинаодинмодуль DT-пакета. Вегосекции Requires могутсодержатьсяТОЛЬКО run-time модули VCL.

Компилируется RT-пакетвлюбойкаталог, доступныйчерезпутипоиска IDE, либочерезпеременнуюсистемногоокружения Path. Инсталлироватьв IDE егоненужно.

DT-пакетсодержитпроцедуру Register, иконкикомпонентовивсе design-time редакторы (свойствикомпонентов), еслитакиеесть. Любойегомодульможетссылатьсяв uses налюбоймодульиз RT-пакета. Вегосекцию Requires иподключается DesignIDE.dcp. Компилируетсяонкудаугодноидолженинсталлироватьсяв IDE.

Такимобразом, вконечныеприложениябудутподключатьсятолькомодули RT-пакета, вкоторыхнетссылокна DesignEditors - атогданепотребуетсяи Proxies. Крометого, вконечныйпроектнебудутподтягиватьсяненужныев run-time кодиресурсыиз DT-пакета.

ОтвечалЮрийЗотов

Установка справки для сторонних компонент под d2005, d2006

2013-08-14T01:28:50+07:00

Новый формат справки, используемый в d2005, d2006 использует файлы с расширением HXI, HXS и ini. Хуже он или лучше предыдущих реализаций – судить не имеет смысла, он просто есть и им приходится пользоваться. Для установки справки для сторонних компонентов, например DevExpress нужно сделать следующее:
1. Воспользоваться утилитой H2Reg.exe, поставляемой вместе с
BDS (../Help/Thirdparty) для каждого ini файла в поставке.
Команда для регистрации будет выглядеть так
"c:\Program Files\Borland\BDS\4.0\Help\Thirdparty\H2Reg.exe" -r -m "CmdFile=<path>HelpFile.ini" "UserDir1=<path>
2. Перезапустить BDS. (Вещь, в общем-то не обязательная, но желательная)

Примечание для DevExpress: перед регистрацией необходимо во всех ini файлах заменить
строки типа %IDE_Namespace_Postfix% на bds4 (для D2006).

по материалам sql.ru

Автор: phanatos

Borland Delphi/C++Builder ToolsAPI, или взгляд на Borland IDE изнутри

2013-08-13T20:38:08+07:00

АндрейСемак

Введение

Рано или поздно каждому профессиональному разработчику программного обеспечения становится тесной среда обитания. По мнению автора, читатель понял, что речь идет о среде разработки, в которой обитает разработчик. У кого это "дом", у кого "строительная площадка", а у кого и то, и другое. В этой статье мы рассмотрим возможность расширения нашего дома. Мы покажем, как именно можно наращивать мощность IDE своими силами, будь то среда разработки Borland Delphi или Borland C++ Builder.

У многих из вас возникало желание добавить несколько полезных функций в любимое IDE. Разработчики фирмы Borland не оставили без внимания эту полезную возможность. Они разработали набор интерфейсов, позволяющих расширять возможности среды, хотя, к сожалению, отсутствие документации по данному вопросу мешает самостоятельному изучению. Жалкие комментарии в исходных текстах не могут воспроизвести всю мощь, которую предоставляет IDE разработчику расширений. Автор статьи попытается передать читателю опыт своих изысканий и постарается своими советами уберечь читателя от многих подводных камней.

Документ построен таким образом, чтобы мы переходили от этапа к этапу от простого к сложному. Насколько это удалось, судить вам. Вместе c вами мы рассмотрим на примерах все сервисы, предоставляемые IDE Borland Delphi\C++Builder.

Итак, начнем?

Подробнее...

Delphi 7 ToolsAPI: Компоненты

2013-08-13T19:16:36+07:00

Создание pop-up меню своего компонента и кое-что еще о классе TComponentExpert

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

Прежде всего вам следует разделить код вашего компонента на Design-time и Run-time. Для этого перенесите ваш компонент в модуль, с названием, например, MyComponent.pas, а процедуры регистрации его в палитре компонентов (procedure Register и т.д.) в модуль, с названием, например, MyComponentReg. На такие меры приходится идти из-за того, что Borland не включила в исходные коды исходник файла Proxies.pas.

Подробнее...

Ещё примеры экспертов

2013-08-13T20:17:18+07:00

This article introduces you to the world of Delphi Experts. Delphi Experts are DLLs, that will be loaded during the startup sequence of Delphi. This article first appeared on Delphi-PRAXiShttps://www.delphipraxis.net/viewtopic.php?t=5300 in German.

NOTE: The techniques shown in this article are valid starting with Delphi 3 or 4 and since Delphi 7 they are deprecated, however, still fully suported by the Delphi IDE.

Installation of a Delphi-IDE-Expert

Every Delphi-Expert has to be registered in the Windows-Registry. For each Delphi-Version installed on a machine, as well as for each user using the machine, the Delphi-Expert has to be registered separately.

In the Registry the Delphi-Expert has to be registered under the folowing key:

HKCU\Software\Borland\Delphi\X.0\Experts

Подробнее...

Использование открытых интерфейсов

2013-08-13T20:18:49+07:00

Одной и наиболее сильных сторон среды программирования Delphi является ее открытая архитектура, благодаря которой Delphi допускает своего рода метапрограммирование, позволяя "программировать среду программирования". Такой подход переводит Delphi на качественно новый уровень систем разработки приложений и позволяет встраивать в этот продукт дополнительные инструментальные средства, поддерживающие практически все этапы создания прикладных систем. Столь широкий спектр возможностей открывается благодаря реализованной в Delphi концепции так называемых открытых интерфейсов, являющихся связующим звеном между IDE (Integrated Development Environment) и внешними инструментами. Данная статья посвящена открытым интерфейсам Delphi и представляет собой обзор представляемых ими возможностей.

В Delphi определены шесть открытых интерфейсов: Tool Interface, Design Interface, Expert Interface, File Interface, Edit Interface и Version Control Interface. Вряд ли в рамках данной статьи нам удалось бы детально осветить и проиллюстрировать возможности каждого из них. Более основательно разобраться в рассматриваемых вопросах вам помогут исходные тексты Delphi, благо разработчики снабдили их развернутыми комментариями. Объявления классов, представляющих открытые интерфейсы, содержатся в соответствующих модулях в каталоге ...\Delphi\Source\ToolsAPI.

Подробнее...

Как найти все установленные компоненты?

2013-08-13T20:34:35+07:00

Code:

uses ToolsApi;

{....}

var

a, i: Integer;

begin

with (BorlandIDEServices as IOTAPackageServices) do

begin

for a := 0to GetPackageCount - 1do

begin

for i := 0to GetComponentCount(a) - 1do

begin

{get each component name with GetComponentName(a, i);}

end;

https://www. swissdelphicenter.ch/en/tipsindex

Как создать простейший эксперт?

2013-08-13T19:15:05+07:00

Code:

{

This unit can be compiled into a package and will then appear in the Delphi

Help menu.

}

unit SDCSimpleExpert;

interface

uses ToolsApi;

type

TSDCSimpleExpert = class(TNotifierObject, IOTAMenuWizard, IOTAWizard)

public

function GetIDString: string;

function GetName: string;

function GetState: TWizardState;

procedure Execute;

function GetMenuText: string;

end;

procedureRegister;

implementation

uses Dialogs;

procedureRegister;

begin

{register expert}

RegisterPackageWizard(TSDCSimpleExpert.Create);

end;

{ TSDCSimpleExpert }

procedure TSDCSimpleExpert.Execute;

begin

{code to execute when menu item is clicked}

ShowMessage('Hello SwissDelphiCenter Simple Expert.');

end;

function TSDCSimpleExpert.GetIDString: string;

begin

{unique expert identifier}

Result := 'SwissDelphiCenter.SimpleExpert';

end;

function TSDCSimpleExpert.GetMenuText: string;

begin

{caption of menu item in help menu}

Result := 'SwissDelphiCenter Simple Expert';

end;

function TSDCSimpleExpert.GetName: string;

begin

{name of the expert}

Result := 'SwissDelphiCenter Simple Expert';

end;

function TSDCSimpleExpert.GetState: TWizardState;

begin

Result := [wsEnabled];

end;

end.

Как создать свой пункт меню в Дельфи IDE?

2013-08-13T17:07:26+07:00

Code:

{....}

uses ToolsApi, Menus;

{....}

var

item: TMenuItem;

begin

{get reference to delphi's mainmenu. You can handle it like a common TMainMenu}

with (BorlandIDEServices as INTAServices).GetMainMenu do

begin

item := TMenuItem.Create(nil);

item.Caption := 'A Mewn caption';

Items.Add(item);

end;

Код определения свойств

2013-08-13T20:25:51+07:00

Итак вам опять нужно "немного" кода. Вот небольшой примерчик компонента лично для вас и остальных моих читателей. Установите этот компонент в палитру Delphi, бросьте экземпляр на форму, закройте ее и модуль и откройте форму как файл формы, используя в диалоге открытия тип *.dfm. Вы увидите дополнительные свойства 'StringThing' и 'Thing'. Первое - свойство строки, второе - бинарное свойство, фактически запись. Если вы имеете HexEdit (шестнадцатиричный редактор) или что-то аналогичное, взгляните на ваш dfm-файл и вы увидите тэги ваших новых свойств вместе с их именами.

Если TReader/TWriter имеет специфические методы для чтения/записи свойств и вы хотите добавить, например, строку, целое, символ или что-то еще (проверьте описание соответствующих методов TReader в файлах помощи), то в этом случае используйте DefineProperty. В случае сложного объекта используйте DefineBinaryProperty и ваши методы чтения и записи получат TStream вместо TReader/TWriter.

Подробнее...

Отладка экспертов

2013-08-13T19:15:36+07:00

Debug Delphi 3 experts with Delphi 3

Delphi 3 has a new feature "debug DLLs". It can be used to debug experts with the internal debugger. Just follow these simple steps, and debugging an expert can be fun:

Make sure that the expert is not installed. If there is this entry

\CURRENT_USER\software\Delphi\3.0\experts,

myexpert=\projects\myexpert\expert.dll

rename this entry to "expert.xxx". (don't delete it, you'll need it later).

Otherwise, you cannot compile a new version.

Подробнее...

Показ свойств во время выполнения программы

2013-08-13T20:33:00+07:00

Я написал компонент-отладчик, выводящий в дереве все компоненты. Попробуйте этот код. Вызывайте функцию DisplayProperties как показано ниже:

Подробнее...

Програмно меняем Delphi's Tool list?

2013-08-13T20:35:24+07:00

Програмно меняем Delphi's Tool list?

Подробнее...

Регистрация редактора свойства

2013-08-13T20:32:33+07:00

Скажем, вы имеете компонент TContainer, содержащий TContainedClass в свойстве с именем 'Contained' - попробуйте добавить следующую строку к процедуре Register вашего компонента:

Code:

RegisterPropertyEditor(TypeInfo(TContainedClass),

TContainer,

'Contained',

TClassProperty);

Подробнее...

Редактор свойства Color с заданными ограничениями

2013-08-13T20:33:24+07:00

Редактор свойства, пример которого приведен ниже, имеет ограничение на устанавливаемые цвета: только clRed, clWhite или clBlue.

Подробнее...

Создание pop-up меню своего компонента и кое-что еще о классе TComponentExpert

2013-08-13T20:37:04+07:00

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

Преждевсеговамследуетразделитькодвашегокомпонентана Design-time и Run-time. Дляэтогоперенеситевашкомпонентвмодуль, сназванием, например, MyComponent.pas, апроцедурырегистрацииеговпалитрекомпонентов (procedure Register ит.д.) вмодуль, сназванием, например, MyComponentReg. Натакиемерыприходитсяидтииз-затого, что Borland невключилависходныекодыисходникфайла Proxies.pas.

Итак, получимдвафайла:
MyComponent.pas:

Code:

unit MyComponent;

interface

uses

SysUtils, Classes;

type

TMyComponent = class(TComponent)

private

{ Private declarations }

protected

{ Protected declarations }

public

{ Public declarations }

published

{ Published declarations }

end;

Подробнее...

Создание редактора свойства

2013-08-13T20:11:45+07:00

Если вы присвоили свойству имя TableName, то полный цикл создания редактора свойств включает следующие шаги:

Опишите класс редактора свойства:

Code:

type

TTableNameProperty = class(TStringProperty)

function GetAttributes: TPropertyAttributes; override;

procedure GetValues(Proc: TGetStrProc); override;

end;

implementation

{ TTableNameProperty }

function TTableNameProperty.GetAttributes: TPropertyAttributes;

begin

Result := [paValueList];

end;

procedure TTableNameProperty.GetValues(Proc: TGetStrProc);

var

TableName: String;

I: Integer;

begin

{ здесь вы должны добавить свой код, ?тобы с помощью цикла обойти имена всех

таблиц, включенных в список }

for I := 0to ???? do

begin

TableName := ????[I];

Proc(TableName);

end;

Затем зарегистрируйте данный редактор свойства следующим образом:

Code:

RegisterPropertyEditor(TypeInfo(string), TcsNotebook, 'TableName', TTableNameProperty);

Текущий модуль и проект

2013-08-13T20:24:49+07:00

Компонент во время проектирования может знать имена текущих модулей и имя проекта. Все это можно получить с помощью ToolServices (см. файл TOOLINTF.PAS)

Имя текущего проекта можно получить с помощью вызова GetProjectName, список модулей/форм - с помощью функции GetUnitCount, которая возвратит количество модулей и затем с помощью GetUnitName(i) мы можем получить имя каждого модуля (также и с формами).

Вот примерный образец кода (получение и запись имен всех модулей/форм в StringGrid и имени проекта в Label):

Code:

procedure TInformationFrm.FormActivate(Sender: TObject);

{ необходимо: StringGrid1 (2 колонки, масса строк), Label1, Label2 }

var

i, j: Integer;

Tmp: string;

begin

StringGrid1.Cells[0, 0] := 'модулей:';

StringGrid1.Cells[1, 0] := 'форм:';

if ToolServices <> nilthen

with ToolServices do

begin

Label1.Caption := ExtractFileName(GetProjectName); { простое имя }

Label2.Caption := GetProjectName; { полное правильное имя пути }

for i := 0to GetUnitCount do

begin

Tmp := ExtractFileName(GetUnitName(i));

StringGrid1.Cells[0, i + 1] := Tmp;

Tmp := ChangeFileExt(Tmp, '.DFM');

for j := 0to GetFormCount do

if ExtractFileName(GetFormName(j)) = Tmp then

StringGrid1.Cells[1, i + 1] := Tmp

end;

Эксперты в DELPHI, или Программист, упростите себе жизнь

2013-08-13T20:36:06+07:00

Эксперты в DELPHI, илиПрограммист, упроститесебежизнь

Имеющее множество достоинств и довольно популярное средство разработки Delphi позволяет расширять функциональные возможности среды разработчика. Речь идет не о косметических изменениях в интерфейсе и не о добавлении компонентов или их наборов, а о придании рабочему окружению программиста новых полезных возможностей, не предусмотренных его создателями. Для решения подобной задачи в Delphi можно воспользоваться так называемыми экспертами. Вспомните, как удобно, ответив на несколько вопросов, создать готовую форму для вывода содержимого таблиц. Или, щелкнув мышью на нужном элементе в списке New Items, получить “костяк” вашего будущего проекта (рис. 1).

Рис. 1. Многиевозможности Delphi реализуютсяспомощьюэкспертов

Чтоэто—стандартныевозможностирабочейсреды? Да, ноприменитьихможнолишьспомощьюэксперта. Отом, какэтосделать, ипойдетречьдалее.

Экспертыв Delphi —чтоэтотакое?

Подробнее...

Активизация и использование в IDE окна CPU

2013-08-14T01:00:26+07:00

Предупреждение: Окно CPU еще до конца не оттестировано и может иногда приводить к ошибкам. Если у вас есть проблемы с отладчиком, или при запуске вашей программы вы не можете им воспользоваться, окно CPU может помочь решить ваши проблемы. Обычно его не требуется включать, если только у вас не "особый случай".

В Delphi 2 эта характеристика встроена, но по умолчанию выключена, называется это окно CPU window, или DisassemblyView. Она легка в использовании, может быть полезной в отладке и сравнении кода при его оптимизации.

Для активизации этой характеристики, запустите REGEDIT и отредактируйте регистры описанным ниже образом. Найдите ключ HKEY_CURRENT_USER\Software\Borland\Delphi\2.0\Debugging. Создайте по этому пути строковый ключ с именем "ENABLECPU". Значение нового ключа должно быть строкой "1". Это все. Теперь в Delphi IDE появился новый пункт меню View|CPUWindow. При его активизации выводится новое окно.

Подробнее...

Горячие клавиши Дельфи

2013-08-14T00:45:31+07:00

Горячие клавиши в окне редактора

F1	контекстная помощь
F3	продолжить поиск (начать - Ctrl+F )
F4	выполнить программу до положения курсора
F5	поставить Break Point
F7	трассировать с заходом в процедуры
F8	трассировать без захода в процедуры
F9	запустить программу
F10	активизировать главное меню
F11	открыть/закрыть Object Inspector
F12	переход между формой и кодом
Ctrl-F1	контекстная помощь
Ctrl-F2	прервать выполнение программы
Ctrl-F3	посмотреть стек
Ctrl-F4	закрыть текущий модуль
Ctrl-F5	список переменных для просмотра (Watch List)
Ctrl-F7	просмотр значений переменных и их изменение
Ctrl-F9	компилировать проект
Ctrl-F10	активизировать главное меню
Ctrl-F11	открыть проект
Ctrl-F12	список модулей проекта
Shift-F7	трассировка заходя в каждую процедуру и перескакивание в каждое возникающее событие
Shift-F10	всплывающее меню
Shift-F11	добавить модуль к проекту
Shift-F12	список форм проекта для быстрой навигации
Alt-F4	закрыть проект и все файлы
Alt-F6	переключение окон
Alt-F8	переход к следующей ошибке компиляции
Alt-F7	переход к предыдущей ошибке компиляции
Ctrl-Shift-F4	закрыть проект и все файлы
Alt-Ctrl-F11	менеджер проектов
Alt-Shift-F4	закрыть все окна, но проект не закрывать
Ctrl-Shift-0..9	поставить метку 0..9
Ctrl-0..9	перейти на метку 0..9
Alt-0	список окон
Ctrl-Enter	открыть файл с именем слова на котором курсор стоит
Ctrl+клик мышкой на слове	перейти на определение этого слова
Alt+выделение текста (мышкой или клавиатурой)	выделение вертикального блока
Ctrl+Shift+Up Ctrl+Shift+Down	переход от объявления процедуры к ее реализации
Ctrl-Shift-C	закончить метод (если он описан - создать шаблон для реализации,если есть реализация - объявить метод)
Ctrl+Space	высветить список методов, свойств объекта (после точки)
Ctrl+Shift+Space	высветить список параметров функции
Ctrl-Shift-E	открыть эксплорер кода
Ctrl-Shift-R	начать/завершить запись макро
Ctrl-Shift-P	выполнить записанное макро
Ctrl-Shift-T	добавить в To Do лист
Ctrl-Shift-U	уменьшить отступ выделенного блока
Ctrl-Shift-I	увеличить отступ выделенного блока
Ctrl-Shift-S	сохранить как
Ctrl-Shift-G	вставить GUID
Ctrl-Shift-B	посмотреть иерархию классов
Ctrl+Shift+Y	удалить от курсора до конца строки
Ctrl+Shift+Z	redo
Ctrl-Alt-W	watch List
Ctrl-Alt-R	grep result
Ctrl-Alt-T	список потоков проекта
Ctrl-Alt-A	вставить дату
Ctrl-Alt-S	вызовы стека
Ctrl-Alt-H	шаблон для документации модуля
Ctrl-Alt-L	локальные переменные
Ctrl-Alt-V	история событий
Ctrl-Alt-B	список Break Points
Ctrl-Alt-M	Модули
Ctrl-N	вставить пустую строку, курсор остается на текущей строке
Ctrl-M Enter	вставить пустую строку, курсор переходит на следующую строку
Ctrl-E	поиск по мере введения символов (Incremental Search)
Ctrl-R	поиск и замена
Ctrl-A	выделить весь текст (только Дельфи 6+)
Ctrl-T	удалить от курсора до конца слова
Ctrl-Y	удалить строку
Ctrl-O, O	вставить все текущие опции компиляции по позиции курсора
Ctrl+O, C	marks a column block
Ctrl+O, I	marks an inclusive block
Ctrl+O, K	marks a non-inclusive block (default when the editor starts)
Ctrl+O, L	marks a line as a block
Ctrl-P	префикс, после которого можно вставить любой ASCII код
Ctrl-S	сохранить текущий файл
Ctrl-F	открыть диалог поиска
Ctrl-J	лист шаблонов
Ctrl-K, С	копирование блока без буфера обмена
Ctrl-Z	отмена
Ctrl-X	вырезать
Ctrl-С	копировать
Ctrl-V	вставить
Ctrl-B	список буферов
Ctrl+K, R	читать блок из файла
Ctrl+K, W	записать блок в файл
Ctrl+O, U	изменить регистр букв в блоке на противоположный
Ctrl+O, A	диалог: "открыть файл"
Ctrl+O, G	переход к строке номер...
Ctrl+K, E	перевод слова в нижний регистр
Ctrl+K, T	выделить слово
Ctrl+K, Y	удалить выделенный блок
Ctrl+K, U	unindent block
Ctrl+K, I	indent block
Ctrl+K, P	печать текста
Ctrl+K, F	перевод слова в вверхний регистр
Alt+[ Alt+]	найти соответствующую скобку
Ctrl+Q, P	вернуть курсор на место последнего редактирования

Подробнее...

Как заставить стартовать Дельфи без заставки?

2013-08-14T00:48:57+07:00

Командной строкой:

Delphi32.EXE -ns

Как заставить стартовать Дельфи без проекта?

2013-08-14T00:51:18+07:00

Командной строкой: Delphi32.exe -np

Как мне избавиться от выскакивающего окна CPU при ошибках?

2013-08-14T01:02:08+07:00

HKEY_CURRENT_USER\Software\Borland\Delphi\4.0\Debugging

ViewCPUOnException=0

Отображения величин в Watch List

2013-08-14T00:58:45+07:00

В BP 7.0 возможно было регулировать форму отображения величин

в процессе отладки в окне ""Watch List"". Возможно ли такое в Delphi?

Такой эффект можно достичь используя следующие спецификации формата отображения (практически совпадающие с BP 7.0), которые указываются через запятую после идентификатора инспектируемой величины:

Символ Применяется к типу Функциональность

-------- ------------------------------------------------------------------

H или X Integers Отображает целые величины в 16-ричном формате

с префиксом 0x

C Char,strings Показывает специальные символы (ASCII 0..31).

По умолчанию они отображаются в виде

esc-последовательности (/n , /t , и т.п.)

D Integers Отображает целые величины в десятичном формате.

Fn Floating point Показывает n десятичных знаков

(где n = 2..18, по умолчанию 7 )

nM All Дамп памяти, где n задает количество отображаемых

байт памяти, начиная с адреса величины.

По умолчанию каждый байт представляется двумя

16-ричными цифрами, но возможно также совместное

использование nM с другими форматами.

P Pointers Отображает величину, как указатель в формате seg:ofs.

R Records, classes, Показывает не только величины полей,

objects но и сами поля, напрмер, как (X:2; Y:5)

вместо (2, 5).

S Char,strings Показывает любые неотображаемые ASCII символы в виде #nn.

Используется вместе с nM.

Автор:StayAtHome

Взято с Vingrad. ru

Работа с IDE из программы

2013-08-14T01:03:36+07:00

Вот подпрограммы, работающие у меня в связке D1 и Win

Подробнее...

Скрытые настройки Дельфи

2013-08-14T00:54:10+07:00

Some undocumented registry settings of Delphi 5 (which -slightly adapted- might also work with Delphi 4 and below) modify the behavior of the Delphi component palette in a manner you may like!

Most values are stored as strings, and boolean values are represented as "1" for true and "0" for false. All values are stored in

HKEY_CURRENT_USER

As always, use of this information is at your own risk... ;-)

Software\Borland\Delphi\5.0\Extras\AutoPaletteSelect

will cause a tab on the component palette to be automatically selected when the mouse is hovering over it. If the mouse is in the top two- thirds (2/3) of the tab, the palette for that tab will automatically be displayed.

Software\Borland\Delphi\5.0\Extras\AutoPaletteScroll

will make you scroll left and right automatically whenever the mouse is positioned over the relevant arrow.

Software\Borland\Delphi\5.0\Editor\Options\NoCtrlAltKeys

Подробнее...

Смена свойств приложения, открываемого, по умолчанию в среде при её запске

2013-08-14T00:55:37+07:00

Большинство стандартных темплейтов зашиты в delphide70.bpl (70 - версия), остальные - в каталоге Objrepos. Описаны же последние в файле bin\delphi32.dro. Т.о:

1. Добавляем в "delphi32.dro" строки:

[C:\Program Files\Lang\Delphi7\ObjRepos\MyApp\MyApp]

Type=ProjectTemplate

Page=Projects

Name=My Application

Description=This is my application template

Author=Eugene

Icon=C:\Program Files\Lang\Delphi7\ObjRepos\MyApp\MyApp.ico

DefaultProject=1

Designer=dfm

(для темплейтов формы Type=FormTemplate, DefaultMainForm=0/1, DefaultNewForm=0/1)

2. Размещаем нашу темплейт-прогу в каталоге "C:\Program Files\Lang\Delphi7\ObjRepos\MyApp\" и называем её "MyApp.dpr".

3. Жмём "File/New/Application" (т.к. у нас DefaultProject=1), либо заходим во вкладку "Projects", а затем кликаем два раза по "My Application".

4. Радуемся!

Автор:Jin X

Взято из https://forum . sources

Типы файлов в среде Дельфи

2013-08-14T00:48:03+07:00

DPR - Delphi Project File. This is actually a Pascal source file; it just happens to be the main program for the application.

PAS - In Delphi, PAS files are always the source code to either a unit or a form. The main program of an application is in the DPR file.

DFM - These files are always paired with PAS files. The DFM file is the binary data used to set up initial data for components (IE, the properties you set in design mode rather than in code). You can't edit a DFM file with a text editor, but if you open it in Delphi, you will see a textual version of the contents.

DCU - A compiled unit, similar in concept to an OBJ file.

OPT - Project Options; i.e. compiler and linker settings, which form is the main form, what icon to use for the application, etc. Generally, the stuff you edit under Options/Project.

RES - A Windows resource file; generated automatically by Delphi and required by the compilation process. You don't need to worry about this file, but don't delete it either.

EXE - All of the above linked together into runnable format.

~DP - A backup file of the DPR file before the last save operation.

~PA - A backup of a .PAS file.

~DF - A backup of a .DFM file.

Эта незнакомая IDE! (статья)

2013-08-14T00:42:39+07:00

Небольшой список приёмов для эффективной работы

IDE - интегрированная среда разработки Дельфи. Все хоть чуть чуть соприкасавшиеся с Дельфи знают эту простую и интуитивно понятную среду. Тем ни менее, эта среда имеет огромное количество функций, которые не столь очевидны для пользователя и не очень хорошо документированы. Целью этой статьи является рассказать о некоторых приёмах работы в среде Дельфи, не столь очевидных даже для профессионалов. Описание базируется на Дельфи 7, но подавляющее большинство приёмов будет доступно и в других версиях, как ранних, так и поздних.

Текстовый редактор

Подробнее...