2014-08-29 168 views
-3

我想在Borland Delphi 7中反轉字符串。如何使用AnsiReverseString函數反轉字符串?如何在Delphi 7中使用AnsiReverseString反轉字符串

Delphi 7是否支持這個功能?

+3

將'StrUtils'單元添加到'uses'子句。 – TLama 2014-08-29 13:03:01

+0

不,仍然不起作用。 Undeclared標識符'ReverseString' – 2014-08-29 13:05:43

+0

他們都在strutils – 2014-08-29 13:06:02

回答

3

像大家在評論中所說的那樣,將StrUtils單元添加到uses子句中。

unit Unit1; 

interface 

uses 
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
    Dialogs, StrUtils, StdCtrls; 

type 
    TForm1 = class(TForm) 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
    private 
    { Private declarations } 
    public 
    { Public declarations } 
    end; 

var 
    Form1: TForm1; 

implementation 

{$R *.dfm} 

procedure TForm1.Button1Click(Sender: TObject); 
var 
    source, target : AnsiString; 
begin 
    source := '123456789'; 
    target := AnsiReverseString(source); 

    ShowMessage('Source = '+source); 
    ShowMessage('Target = '+target); 
end; 

end. 
+2

我不知道什麼時候引入了'AnsiReverseString()',但是'ReverseString()'確實存在於D7中。在D2009 +中,將'AnsiReverseString()'和'ReverseString()'的'AnsiString'版本移動到'AnsiStrings'單元。 – 2014-08-29 18:08:42