View Full Version : اجرای نرم افزاری که با دلفی نوشته شده در فتوشاپ
سيد مجتبي هاشمي
جمعه 04 بهمن 1387, 11:54 صبح
سلام دوستان. کسی میدونه چه طوری میشه یک منو به منوهای فتوشاپ اضافه کرد و نرم افزار نوشته شده با دلفی 7 را توسط آن اجرا کرد؟
mossaferin
شنبه 05 بهمن 1387, 15:12 عصر
سلام
تا اونجایی که من میدونم ، باید یه plugin برای فوتوشاپ نوشته بشه ...
یه سری به این لینک بزن
http://www.djpate.freeserve.co.uk/AutoPShp.htm#QuickRef
این هم یه مطلب که بدک نیست
To get the Photoshop type library do the following in Delphi:
- Project Menu > Import Type Library
- Click 'Add' and browser to the Photoshop directory (usually C:\Program Files\Adobe\Photoshop 5.x) and select 'TypeLibrary.tlb'
- Now click on 'Create Unit'
- Save this unit to the project directoy where you want to use it
- In your project add these unit to the uses clause:
uses ComObj, ActiveX (javascript:void(0)), PhotoShopTypeLibrary_TLB;
- To start Photoshop:
PS (javascript:void(0)): IPhotoShopApplication;
AppWasRunning: boolean;
Result: HRESULT;
Unknown: IUnknown;
AppWasRunning := False;
Result := GetActiveObject(CLASS_PhotoshopApplication, nil, Unknown);
if (Result = MK_E_UNAVAILABLE) then
PS := CoPhotoshopApplication.Create
else begin
{ make sure no other error occurred during GetActiveObject }
OleCheck(Result);
OleCheck(Unknown.QueryInterface(IPhotoShopApplicat ion, PS));
AppWasRunning := True;
end;
- To make it visible:
PS.Set_Visible(true);
- To stop Photoshop:
PS.Quit;
- To load and save a picture:
Pic (javascript:void(0)): IAutoPSDoc;
Pic := PS.Open('Picture.psd');
Pic.SaveTo('Picture2.psd');
- To play an action:
PS.PlayAction('Large Round Button');
- To apply a filter (plugin) to the active picture:
AC: IActionControl;
AD: IActionDescriptor;
AC := PS.MakeControlObject;
AD := PS.MakeDescriptor;
AD.PutDouble(phKeyRadius, 10.3);
AC.Play(phEventGaussianBlur, AD, phDialogSilent);
or
AC := PS.MakeControlObject;
AD := PS.MakeDescriptor;
AD.PutInteger(phKeyAmount, 50);
AC.Play(phEventSpherize, AD, phDialogSilent);
More info can be found in the SDK document 'Photoshop OLE Automation.pdf'.
موفق باشی
سيد مجتبي هاشمي
شنبه 15 فروردین 1388, 23:40 عصر
ممنون. اما ميشه بگين از اين كد بايد كجا و چطور استفاده كنم؟
Felony
یک شنبه 16 فروردین 1388, 06:29 صبح
برای پلاگین نویسی باید به نحوه ی نوشتن و استفاده از فایلهای DLL کاملا مسلط باشید و بعد از آن SDK پلاگین نویسی برای فتوشاپ رو بگیرید ، احتمالا همراهش دمو هم هست که کار این SDK برقرار کردن ارتباط بین DLL شما و فتوشاپ هست .
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.