06-02-2016, 03:56 AM
(آخر تعديل لهذه المشاركة: 06-02-2016, 04:07 AM بواسطة merzoug2020.)
ShellExecute(Handle, 'runas', 'cmd.exe', '/c REG add wmic diskdrive get serialnumber',nil,SW_hide);
أريد هذه النتيجة تضهر على edit1.text
أريد هذه النتيجة تضهر على edit1.text


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)