Delphi заготовки

    Задача автоматизация конвертации изображения из BMP в JPG одним кликом и интеграция с контекстным меню.

на основании статьи

http://www.itword.net/page/delphi-punkt-v-kontekstnoe
http://articles.org.ru/cfaq/index.php?qid=2954

\Program Files\Borland\Delphi7\Demos\ActiveX\ShellExt - пример из демо Delphi
 
разделим программу по конвертации  appname.exe  и dll для инициализации

в Dll вносим следующие изменения 

1.  Class_ContextMenu: TGUID = '{3ff174ae-e8bd-4d3d-95b9-9bb9cc6d4a91}';

что такое TGUID
http://ru.wikipedia.org/wiki/GUID
значение берем
http://www.guidgenerator.com/online-guid-generator.aspx

ме ... Читать дальше »

System.StrUtils.ReplaceStr

Delphi

function ReplaceStr(const AText, AFromText, AToText: string): string;

C++

extern PACKAGE System::UnicodeString __fastcall ReplaceStr(const System::UnicodeString AText, const System::UnicodeString AFromText, const System::UnicodeString AToText)/* overload */;

Описание
Заменяет все вхождения подстроки в строку, используя поиск с учетом регистра.
Используйте ReplaceStr чтобы заменить все вхождения подстроки
AFromText со строкой AToText, в строке AText.
ReplaceStr возвращает строку, полученные после замены.
Используйте ReplaceText сделать без учета регистра замены.

    Примечание: Рекурсивные замена подстрок не поддерживается. Это означает, что если замена AToText результаты в новом матче за AFromText, что матч не будет заменен.


для  Delphi 7 код

function ReplaceStr(const AText, AFromText, AToText: string): string;
{замена подстроки в строке}
var
&nb ... Читать дальше »