Курсовая работа: Объектно-ориентированная разработка программ

Визуальный Компонент TEdit позволяет пользователю ввести с клавиатуры строку символов, или вывести в их поле редактирования. При вводе-выводе данных изменяется значение свойства Text компонента типа TEdit. Заметим, что введенный текст будет типа string, и выводимый текст должен быть типа string. Для преобразования строки символов в число и обратно существуют специальные функции, например, некоторые из них:

1) StrToInt(Text_String) – преобразует строку Text_String в целое число (конечно, если она состоит из символов, которые соответствуют цифрам, иначе, преобразование бессмысленно);

2) IntToStr(Number_Integer) – преобразует целое число Number_Integer в строку эквивалентных символов;

· Листинг программы содержится в приложении А.

· Результат тестового запуска приведен в приложении В.

· Программа разработана с использованием языка Delphi.

Приложение А

Листинг программ:

unit tmain;

{$mode objfpc}{$H+}

interface

uses

Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,

StdCtrls;

type

{ TForm1 }

TForm1 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

private

{ private declarations }

public

{ public declarations }