Найдено 3 результата

andreeshgtee
27.11.2020 19:32:46
Форум: Lazarus
Тема: Не вычисляет функцию
Ответы: 1
Просмотры: 2262

Не вычисляет функцию


unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls,Math;

type

{ TForm1 }

TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
procedure Button1Click(Sender: TObject);
private

public

end ...