الفريق العربي للهندسة العكسية
دالة Wsprintfa - نسخة قابلة للطباعة

+- الفريق العربي للهندسة العكسية (https://www.at4re.net/f)
+-- قسم : منتديات الهندسة العكسية - Reverse Engineering Forums (https://www.at4re.net/f/forum-4.html)
+--- قسم : الأسئلة والإستفسارات، حلول المشاكل و تبادل الخبرات - Expert Exchange Newbie Questions Answers (https://www.at4re.net/f/forum-36.html)
+--- الموضوع : دالة Wsprintfa (/thread-1377.html)

دالة Wsprintfa - Polia - 17-01-2020

سلام اعدروني علي كثرة استفساراتي 
انا بصدد كتابة كيغن KeyGein حول برنامج فهمت خوارزميتة حيث يقوم هدا الأخير بجمع بايتات الأسم كل بايت يتم اضافة له 32 هيكس ثم يحول الناتج الي Unsigned intبدالة Wsprintf 
سؤالي هو كيفية التعامل مع هاته الدالة ولو ممكن مثال

RE: دالة Wsprintfa - x-member - 17-01-2020

MSDN
[align=left][url]https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-wsprintfa[/url][/align]
هذا مثال بال C++  : 
[url]https://www.programiz.com/cpp-programming/library-function/cwchar/swprintf[/url]
هذا مثال من StackOverflow بالدلفي : 
function wsprintf(Output: PChar; Format: PChar): Integer; cdecl; varargs;
  external user32 name {$IFDEF UNICODE}'wsprintfW'{$ELSE}'wsprintfA'{$ENDIF};

procedure TForm1.FormCreate(Sender: TObject);
var
  S: String;
begin
  SetLength(S, 1024); // wsprintf can work only with max. 1024 characters
  SetLength(S, wsprintf(PChar(S), '%s %03d', 'Hallo', 3));
end;

ملاحظة : 
حاول البحث أولا ثم اطرح تساؤلاتك داخل المنتدى , بالتوفيق صديقي

RE: دالة Wsprintfa - Polia - 19-01-2020

(17-01-2020, 07:18 PM)Rever7eR كتب :  
https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-wsprintfa

شاهدت المثال من قبل جربته لكن واجهت بعض الصعوبة في تمرير بعض البارامترات

RE: دالة Wsprintfa - x-member - 19-01-2020

(19-01-2020, 01:27 PM)Polia كتب : واجهت بعض الصعوبة في تمرير بعض البارامترات

لهذا يجب عليك عدم الاستعجال , حاول فهم المبادئ أولا 
[url]http://delphiprogrammingdiary.blogspot.com/2014/12/string-pchar-char-in-delphi.html[/url]