28-04-2009, 05:39 PM
28-04-2009, 06:53 PM
السلام علكيم
أضف الوحدة ShellAPI في الحقل Uses
ضع مكون TMemo ثم أضف الأمر التالي:
أضف الوحدة ShellAPI في الحقل Uses
ضع مكون TMemo ثم أضف الأمر التالي:
PHP كود :
ShellExecute(0, 'open', PChar('mailto:YourEmail@EmailProvider.com?subject= Bug%20Report&Body=' + Memo1.Text),
nil, nil, SW_SHOWNORMAL);