求助Delphi最基础的问题-如何写公用函数

Question

由于是新手,所以.... delphi 如何写函数,放到公用的地方,让各个窗体都可以调用到,由于是新手,希望好心人举例或说的详细些  谢谢

Answer 1

新建一个Unit（如PubUnit），然后在里面写公用函数，其他地方引用这个Unit即可
Use PubUnit;

Answer 2

可以说的详细些吗.
都说了是新手了, 是不是新建立一个 Unit, 
再在每个窗体里面 Use 的位置里面加上 Unit 是吗?不是很清楚啊, 可以给段代码 吗?我刚刚打开一个窗体
unit main_unit;是不是我在其他的窗体里面
uses
的下 加上   main_unit;
  main_unit 里面公用函数的格式怎么写???

Answer 3

我把函数放到... 里面报错啊 
  public
    { Public declarations }
    Function myString():String;
  end;有没有热心的牛人帮助一下

Answer 4

是的，别的单元要使用公用函数时， use main_unit 即可。unit main_unit;interfaceuses
  Windows, SysUtils, Classes;//输出CHART界面
procedure PrintChart();implementationprocedure PrintChart();
begin
//自己写函数体
end;
end.

Answer 5

你那个是过程 我想写个公用的函数, 又返回值的函数, 还有请教一下,我在其他窗体里面引用时,直接在最上面加上 use main_unit  就可以了吗?

Answer 6

但我需要有返回值啊, byvar byref  在 DELPHI 里面怎么声明 ....
谢谢在指点一下

Answer 7

谢谢你们, 请教一下 delphi 如何定义一个全局的变量.. 在各个窗体里面都可以调用里面的值

Answer 8

定义全局变量:unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  server : string;
  flag: integer;implementation{$R *.dfm}end.