关于一个公共函数问题!

Question

function CheckEmpty(sender: Tobject; tipstr: string): boolean;
begin
  if (sender is Tedit) then
  begin
    if trim((sender as Tedit).Text) = '' then
    begin
      application.MessageBox(pchar(tipstr), 'Tips', MB_YESNO  + MB_ICONINFORMATION);
      result := true;
      exit;
    end;
    result := false;
    exit;
  end;
报错提示:这个TEDIT没有定义或没有声明,我是从别人的代码复制过来的,是一个公共函数单元,这是为什么呀!请教高手!

Answer 1

SelectDirectory,小弟想问一下,这个函数是DELPHI本身就有的吗？提示的错误和上面的是一样的，没有声明或定义