Forms Delphi

  1. Home
  2. Delphi
  3. Forms
  4. How to determine if the window is a Unicode window
Title: How to determine if the window is a Unicode window
procedure TForm1.Button1Click(Sender: TObject);
begin
{determine if the window is a Unicode window}
if (IsWindowUnicode(Form1.Handle)) then
Button1.Caption := 'This window is a Unicode window'
else
Button1.Caption := 'This window is not a Unicode window'
end;