التعامل مع الرسائل في دلفي MessageBox & Delphi

[kachwahed]

كيف اضيف خانة للعنوان بالكود

PHP كود :

MessageBox(Handle, 'محتوى الرسالة','عنوان الرسالة',MB_OK + MB_ICONINFORMATION) 


[Abderrahmane]

كيف أكتب علبة حوار فها الخيارات
حذف
تغيير
إلغاء
و هم ثلاث أزرار و لكل واحد منهم برنامجه

[rhopalocera]

PHP كود :

procedure TForm1.Button1Click(Sender: TObject);
var
  msgRet: integer;
begin
  msgRet := Messagedlg(
    'Your confirmation question here...',
    mtconfirmation,
    [mbyes, mbno, mbcancel],
    0);

  if msgRet = mryes then
  begin

  end;

  if msgRet = mrcancel then
  begin

  end;

  if msgRet = mrno then
  begin

  end;

end; 


[delphi64]

وعليكم السلام ورحمة الله وبركاته

الله يعطيك العافيه ومشكور على الدرس الجميل
كيف اضيف خانة للعنوان بالكود
هذا كود الرسالة ابغى اعنونها

with Application do
  begin
    NormalizeTopMosts;
    MessageBox('This should be on top.', 'Look', MB_OK);    // [smbOK]
    RestoreTopMosts;
  end;