fpm_start( "true" );
1 Answer 1
While I can’t explain the error you’re getting, your code is totally wrong.
Your bad use of the typecast with a non-type may be confusing the compiler. If that doesn’t solve it, please edit your question to add more code around what you’ve posted (the dozen or so lines before what you’ve posted would help).
в этой строчке: y:=StrToFloat(Edit2.Text);
вот код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Memo1: TMemo;
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);