سلام اعدروني علي كثرة استفساراتي
انا بصدد كتابة كيغن KeyGein حول برنامج فهمت خوارزميتة حيث يقوم هدا الأخير بجمع بايتات الأسم كل بايت يتم اضافة له 32 هيكس ثم يحول الناتج الي Unsigned intبدالة Wsprintf
سؤالي هو كيفية التعامل مع هاته الدالة ولو ممكن مثال
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;
ملاحظة :
حاول البحث أولا ثم اطرح تساؤلاتك داخل المنتدى , بالتوفيق صديقي
(17-01-2020, 07:18 PM)Rever7eR كتب : [ -> ]
شاهدت المثال من قبل جربته لكن واجهت بعض الصعوبة في تمرير بعض البارامترات
(19-01-2020, 01:27 PM)Polia كتب : [ -> ]واجهت بعض الصعوبة في تمرير بعض البارامترات
لهذا يجب عليك عدم الاستعجال , حاول فهم المبادئ أولا
[url]http://delphiprogrammingdiary.blogspot.com/2014/12/string-pchar-char-in-delphi.html[/url]