دخول

**kachwahed** · 27-02-2012, 12:22 AM

وعليكم السلام ورحمة الله
هذا تصحيح نحوي للمثال الذي أرفقته:

كود :
function LoadRecString(RecName, RecType: PChar): PChar;
var
  hRessourceVoulue, hBlockMemoireRes: THandle;
  montexte: PChar;
begin
  hRessourceVoulue := FindResource(HInstance, RecName, RecType);
  hBlockMemoireRes := LoadResource(0, hRessourceVoulue);
  montexte := LockResource(hBlockMemoireRes);
  FreeResource(hRessourceVoulue);
  result := montexte;
end;

إقتباس :اين الصق هذا الكود... لكن نفس المشكل

المعذرة، لكن المشكلة أنك تحاول نسخ ولصق كود دون فهم!
راجع هذه المواضيع:
http://www.delphi4arab.net/forum/showthr...p?tid=2030
http://www.delphi4arab.net/forum/showthr...p?tid=3231
http://www.delphi4arab.net/forum/showthr...p?tid=2854
بالتوفيق.

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة