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;