如何在全局函数中调用from1的成员

Question

[错误] ftp1.pas(100): Undeclared identifier: 'get'
[错误] ftp1.pas(102): Undeclared identifier: 'SetFileDateTime'
[错误] ftp1.pas(111): Undeclared identifier: 'get'
[错误] ftp1.pas(117): Undeclared identifier: 'listbox'如何在全局函数中调用from1的成员

Answer 1

要有全局的 form1 变量后, delphi 自动生成了一个
form1.xxxx

Answer 2

在全局函数中 应该加上 Form1 . 前缀。
为保险起见，还要在
procedure TForm4.FormCreate(Sender: TObject);
begin
 .....
 Form1 : =Self;
end;

Answer 3

申明一个变量为form1，然后对这个变量进行操作！

Answer 4

把TForm指针为参数传进全局函数中。或
procedure abc(m_frm:TForm);
var
 m_frm1:TForm;
begin
  m_frm.成员
  如果需要频繁调用TForm成员
  m_frm1:=m_frm;
  m_frm1.成员
end;把TForm HWND(Handle) 传进函数。m_frm :=TForm(FromHandle(HWND));