Наши преимущества

Конвертация кода

Ольга 1989

Турист
Credits
0
Здравствуйте форумчане! Я - новенькая! Забрела сюда случайно через поиск. Хочу попросить помощи у настоящих спецов в области программирования на различных языках. Как правильно написать процедуру для кнопки Button2 в моей программке. (Чтобы в поле Memo1 появился результат того, что написано на кнопке - сконвертированный код с Delphi на C++)

Начальный код:
Код:
unit Unit4;

interface

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

type
  TForm4 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    Label1: TLabel;
    Button2: TButton;
    Memo1: TMemo;
    procedure Button1Click(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form4: TForm4;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm4.Button1Click(Sender: TObject);
begin
Label1.Caption:=FloatToStr(StrToFloat(Edit1.Text)+ StrTofloat(Edit2.Text));
end;

end.
 
Label1->Caption = FloatToStr(StrToFloat(Edit1->Text) + StrTofloat(Edit2->Text));
Memo1->Text = Label1->Caption;
или для кнопки
Button1->Caption = FloatToStr(StrToFloat(Edit1->Text) + StrTofloat(Edit2->Text));
Memo1->Text = Button1->Caption;
и т.д. и т.п.
 
Последнее редактирование модератором:
К сожалению это не то что мне надо. Ну это не и неудивительно, что вы меня неправильно поняли. Почему-то здесь не загружаются ни rar, ни zip, ни jpg в которых более наглядно всё объясняется.
Дело в том, что мне надо получить код на С++ в поле Мемо, сгенерированный автоматически (при нажатии кнопки)
 
Последнее редактирование модератором:
Верх