indy client server

سلام :گریه:
می خام یه برنامه بنویسم با ایندی که رو سیستم کلاینت یه فرم رو بتونه باز کنه و ببنده و بتونه task maneger سیستم کلاینت رو تو سیستم سرور نشون بده و بتونه برنامه در حال اجرا رو ببنده
هر چی سعی کردم از اموزشهای این سایت چیزی بفهمم نتونستم اگه دوستان راهنماییم کنن ممنون می شم:ناراحت:

شما یه برنامه مثل reَAdmin می خوای ظاهراً اما با امکانات بیشتر
این خیلی سخته
سوکت پروگرمینگ یکسری امکانات مشابه این ها رو داره اما من تا بحال با اون کار نکردم

***با تلاش موفق می شوید.***

نقل قول:

---

می خام یه برنامه بنویسم با ایندی که رو سیستم کلاینت یه فرم رو بتونه باز کنه و ببنده

---

برنامش رو گذاشتم.

نقل قول:

---

بتونه برنامه در حال اجرا رو ببنده

---

کافیه از مثال تبعیت کنی ، لیست پروسس ها رو بگیر و بفرست.

نقل قول:

---

[شما یه برنامه مثل reَAdmin می خوای ظاهراً اما با امکانات بیشتر
این خیلی سخته

---

با وجود Indy این چیزها خیلی پیش پا افتادس.

دوست عزیز واسه task maneger چی می تونید منو راهنمایی کنید

با این تابع لیست پروسه ها رو بگیرید :

Procedure GetTasklist(fList:TstringList);

  Function EnumWindowProc(Wnd:HWnd;Lst:TstringList):bool;stdC  all;

  var

    Caption:array[0..128] of char;

  Begin

    Result:=true;

    If (IsWindowVisible(wnd))and

      ((GetWindowLong(wnd,gwl_HwndParent)=0) or

       (Hwnd(GetWindowLong(Wnd,Gwl_HwndParent))=GetDeskto  pWindow)) and

       ((GetWindowLong(wnd,gwl_ExStyle)and ws_Ex_ToolWindow)=0) then

    begin

      SendMessage(wnd,Wm_GetText,SizeOf(Caption),Integer  (@Caption));

      lst.Add((caption));

    end;

  end;

Begin

  If not assigned(fList) then

    flist:=tstringList.Create;

  flist.Clear;

  EnumWindows(@EnumWindowProc,Integer(fList));

end;

البته همه اینها قبلا در سایت مطرح شده ، اگه جستجو کنید زودتر به نتیجه می رسید.