DELPHI和lazarus相同的只是都能解释编译用PASCAL写出来的代码，实际上实现的逻辑和方法差的好远呢

你用DELPHI的方法去实现的逻辑，不一定能够让LAZARUS解释编译

改变这个窗口类名什么用呢，用于FindWindow？

改变Form1的Name属性，可以改变类名TForm1。

可以通过继承一个TForm，修改窗口的类名。

是的，用来找到，并发送消息 

引用 2 楼 ooolinux 的回复:

改变这个窗口类名什么用呢，用于FindWindow？

是的，用来跨进程发送消息

引用 4 楼 lyhoo163 的回复:

可以通过继承一个TForm，修改窗口的类名。

大神，进程的窗口类名称，好像不是窗体的类名，

我看了一下lcl的实现，窗口类名是硬编码的常量：
lazarus\lcl\interfaces\win32\win32int.pp
const
  BOOL_RESULT: array[Boolean] of String = ('False', 'True');
  ClsName: array[0..6] of char = 'Window'#0;
  ClsHintName: array[0..10] of char = 'HintWindow'#0;
  EditClsName: array[0..4] of char = 'Edit'#0;
  ButtonClsName: array[0..6] of char = 'Button'#0;
  ComboboxClsName: array[0..8] of char = 'ComboBox'#0;
  ListboxClsName: array[0..8] of char = 'LISTBOX'#0;
  TabControlClsName: array[0..15] of char = 'SysTabControl32'#0;
  ListViewClsName: array[0..13] of char = 'SysListView32'#0;

  LCLComboboxClsName: array[0..11] of char = 'LCLComboBox'#0;
  LCLListboxClsName: array[0..10] of char = 'LCLListBox'#0;
  LCLCheckListboxClsName: array[0..15] of char = 'LCLCheckListBox'#0;
  ClsNameW: array[0..6] of WideChar = ('W', 'i', 'n', 'd', 'o', 'w', #0);
  ClsHintNameW: array[0..10] of WideChar = ('H', 'i', 'n', 't', 'W', 'i', 'n', 'd', 'o', 'w', #0);

然后在窗体建立handle的时候直接使用了指向类名的指针:
lazarus\lcl\interfaces\win32\win32wsforms.pp
class function TWin32WSCustomForm.CreateHandle(const AWinControl: TWinControl;
begin
//...
  pClassName := @ClsName[0];
//...
end;

引用 8 楼 早打大打打核战争 的回复:

我看了一下lcl的实现，窗口类名是硬编码的常量：
lazarus\lcl\interfaces\win32\win32int.pp

大神，感谢！！！我说怎么不起作用，IDE和其编译出的EXE全是Window