各位大大好，小弟是初學者，照著範例練習字串迴轉的函數，但是要執行的時候都會出現下列錯誤訊息，我使用其他函式都不會出現此錯誤訊息，是否這函式要有特殊的定義？

[Error] Unit1.pas(30): Undeclared identifier: 'ReverseString'

程式碼範例如下：

[code delphi]
var
ss,s: string;
begin
ss := 'Delphi';
s := ReverseString(ss);
ShowMessage(s); {ihpleD}
end;
[/code]

------
今天的事，留到後天再說....

[Error] Unit1.pas(30): Undeclared identifier: 'ReverseString'    這個錯誤訊息是 "未定義的識別字 : 'ReverseStrgin' "
ReverseString 這個函數宣告於StrUtils這個單元中, 只是在 Uses 加入 StrUtils單元 就可以了...

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, StrUtils;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}

{ TForm1 }
procedure TForm1.Button1Click(Sender: TObject);
var
ss,s: string;
begin
ss := 'Delphi';
s := ReverseString(ss);
ShowMessage(s); {ihpleD}
end;

end.

編輯記錄

感謝大大的回覆，小弟又上了寶貴的一課，經過大大的解釋，小弟也比較看得懂函式語法代表的意義了

首部 function ReverseString(const AText: string): string; StrUtils.pas <==這邊就是說明是用哪個單元了
功能 返回字符串AText的反序
說明 ReverseString('1234') = '4321'
參考 function System.SetLength
例子 Edit3.Text := ReverseString(Edit1.Text);

所以函數要使用，除了System單元外的函式，若沒有在uses 內出現要引用，必需要在uses內加入該單元才可正確引用函式。

------
今天的事，留到後天再說....

編輯記錄