【Delphi】不特定文字內容的對話視窗

Application.Messagebox ('顯示文字內容', '對話視窗標題文字', MB_OK)

其中的 2 個字串型別為指標, 所以當對話視窗的文字內容非固定時, 在 Messagebox 中要呼叫 PChar() 做型別轉換.

範例：

 
procedure TForm1.Button1Click(Sender: TObject);
var
    i: PAnsiChar;
    cTest: string;
begin
    cTest := 'test string';
    cTest := cTest + cTest;
    Application.MessageBox(PChar(cTest), 'test msgbox', MB_OK);
end;