Mega Code Archive

 

Categories / Delphi / System

 

Display a char map

Title: Display a char map Use ShellExecute function for executing charmap.exe or any other file. procedure TForm1.Button1Click(Sender: TObject); var WinDir: array[0..255] of Char; begin GetWindowsDirectory(WinDir, 255); ShellExecute( Form1.Handle, PChar('open'), PChar(StrPas(WinDir)+'\charmap.exe'), '', '', SW_SHOW); end;