엠바 카데로 XE7 및 System.VarCmplx를 사용하면 복소수를 문자열로 표시해야합니다. 복소수가 생성되고 의도가 양식의 캡션에 표시되는 간단한 예제입니다. 내 문제는 복잡한 숫자를 문자열로 가져 오는 방법을 알아낼 수 없다는 것입니다. '1.23 + 4.56i'여야합니다.복소수 인쇄
unit Unit57;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants,
System.Classes, Vcl.Graphics,
System.VarCmplx,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs;
type
TForm57 = class(TForm)
procedure FormCreate(Sender: TObject);
end;
var
Form57: TForm57;
implementation
{$R *.dfm}
procedure TForm57.FormCreate(Sender: TObject);
v : Variant;
begin
v := VarComplexCreate(1.23, 4.56);
// following does not work
Caption := v.AsString;
end;
end.
FWIW 이것은 복잡한 숫자로 작업하는 데 실제로 비효율적 인 방법입니다. –
안녕하세요 David - 당신은 무엇을 제안합니까? –
연산자 오버로드가있는 향상된 레코드입니다. –