小编kos*_*sia的帖子

编译正在运行,一切正常.但形式没有任何反应.
表单已启动,但不会自动添加任何数据.如果您手动输入数据,那么当您按下按钮时,也没有任何反应

有必要显示函数Y(x)的值及其在S(x)系列中的扩展,x从x0到xk变化,步长为h =(x0-xk)/ 10.在x的整个范围内的S(x)和Y(x)的值表示计算S(x)和Y(x)的正确性.

unit Unit1;

interface

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

type
TForm1 = class(TForm)
    Label1: TLabel;
    Label2: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Label3: TLabel;
    Label4: TLabel;
    Edit3: TEdit;
    Edit4: TEdit;
    Memo1: TMemo;
    Button1: TButton;
    procedure Form1Create(Sender:TObject);
    procedure Button1Click(Sender:TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
{$R *.dfm}

procedure TForm1.Form1Create(Sender: TObject);
begin
  Edit1.Text := '0';
  Edit2.Text := '2';
  Edit3.Text := '5';
  Edit4.Text := …