Советы по Delphi. Версия 1.4.3 от 1.1.2001

Озеров Валентин

 Reader := CreateReader;

 try

Reader.GetText(0, PChar(Module), Length(Module));

 finally

Reader.Free;

 end;

 APos := Pos('unit ' + UnitName, Module);

 if APos > 0 then begin

try

InsertText := '';

AssignFile(F, VCSConfig.HeaderFileLocation);

Reset(F);

while not EOF(F) do begin

Readln(F, Tmp);

InsertText := InsertText + #13 + #10 + Tmp;

end;

CloseFile(F);

InsertText := InsertText + #13 + #10;

Writer := CreateWriter;

try

Writer.CopyTo(APos - 1);

Writer.Insert(PChar(InsertText));

finally

Writer.Free;

end;

except On E : EStreamError do

MessageDlg('Не

могу создать шапку', mtInformation, [mbOK], 0);

end;

 end;

end;

{ ********************* Конец TIVCSModuleInterface ************************** }

end.

– Jim Poe 

Зависание Delphi 4(5)

Сергей Сахаров советует:

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

Решение:

Добавьте в реестр строку:

[HKEY_CURRENT_CONFIG\Display\Settings]

"BusThrottle"="on"

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

[Display] "BusThrottle"="On"

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

Ошибка 1157 cmplib32.dll

Delphi 2 

Cannot open c:\delphi 2.0\bin\cmplib32.dll Error code 1157 (Не могу открыть c:\delphi 2.0\bin\cmplib32.dll, код ошибки 1157).

Что за ошибка такая с кодом 1157? Я пробовал удалить все DCU-файлы и переустановить PAS– и DFM-файлы, но ошибка не исчезла. Как это исправить?

Убедитесь в том, что все требуемые DLL находятся в search-пути.

– Mike Orriss 

2% ресурсов, в режиме редактирования

Delphi 1 

Если у вас открыты все формы (показаны или минимизированы), а в редакторе кода открыты все модули, ресурсы очень быстро исчерпываются. Попробуйте закрыть все формы и модули, и открыть только те, которыми вы будете пользоваться. В противном случае при компиляции вы можете завесить Delphi и саму машину. 

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

Delphi 2 

Предупреждение:

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

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

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

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

Создайте 2 одинаковых обработчика события. В каждом обработчике события разместите приведенный ниже код. Установите точку прерывания на первой строчке каждого обработчика. Запустите приложение и активизируйте события. Сравните ассемблерный код обоих методов. Один короче? В этом случае он будет исполняться быстрее.

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

Хорошим примером, где различный код выполняет одну и ту же работу, но делает это с разной скоростью, является использование конструкции «with object do». Исходный код с многократным использованием конструкции «with object do» будет длиннее, но ассемблерный код короче. Вспомните, сколько раз вы устанавливали свойства для динамически создаваемых объектов? Код:

with TObject.create do begin

 property1 := ;

 property2 := ;

 property3 := ;

end;

будет выполняться быстрее, чем

MyObj := TObject.create;

MyObj.Property1 := ;

MyObj.Property2 := ;

MyObj.Property3 := ;

 

Описание типов файлов для Delphi

Delphi 3 

Формат .CAB-файлов

Это формат файлов, который Delphi предлагает теперь своим пользователям для размещения в Интернете. Cabinet-формат является эффективным средством для упаковки нескольких файлов. Cabinet-формат имеет две ключевых характеристики: в отдельном кабинете (.cab-файл) могут храниться несколько файлов, и сжатие данных выполняется в зависимости от типа файлов, что значительно увеличивает коэффициент сжатия. Создание Cabinet-файла зависит также от количества упаковываемых файлов и ожидаемого к ним типа доступа (последовательный, произвольный, одновременный ко всем файлам или доступ к нескольким файлам в одно и тоже время). Delphi не пользуется преимуществами сжатия файлов в зависимости от их типа.