Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.06.2014, 10:20   #1
Алька111
Новичок
Джуниор
 
Регистрация: 20.06.2014
Сообщений: 6
По умолчанию Компоненты отображения и редактирования

Помогите пожалуйста с заданием в делфи!
вот Цель:
 Познакомиться с назначением компонентов отображения и редактирования информации Label, Edit, LabeledEdit, свойствами и методами компонентов,
 Научиться отображать и редактировать данные, изменять свойства компонентов, составлять процедуру, обрабатывающую события, связанные с данным компонентом, манипулировать ими – перемещать, изменять размер, задавать шрифт, начертание и цвет текста,
и само задание :Даны стороны прямоугольника. Найти длину диагонали.
Алька111 вне форума Ответить с цитированием
Старый 20.06.2014, 10:26   #2
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,442
По умолчанию

Показывайте наработки, поможем
Человек_Борща вне форума Ответить с цитированием
Старый 20.06.2014, 13:39   #3
саша40
Участник клуба
 
Регистрация: 12.09.2012
Сообщений: 1,030
По умолчанию

Вопрос: Ему нужно про компоненты или само задание?
1)Задаем в поиск: "T<название компонента> в Delphi". Читаем результаты. Лучше всего искать их описание.
2)Диагональ любого прямоугольника вычислить можно по теореме Пифагора:
d^2=a^2 + b^2, где d-длина диагонали. а,b - стороны прямоугольника(его длина и ширина).
Что нужно программисту: Компьютер, Среда программирование, Воображение, Прямые руки, Мозги, Знания этой среды программирования.
Программист-это профессия, а программирование-это моё хобби.
саша40 вне форума Ответить с цитированием
Старый 20.06.2014, 13:46   #4
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Цитата:
Ему нужно про компоненты или само задание?
Да скорее всего решить задание с помошью компонент.
Что-то типа:
Код:
unit Unit1;

{$mode objfpc}{$H+}

interface

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

type

  { TForm1 }

  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    procedure Edit1Change(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.lfm}

{ TForm1 }

procedure TForm1.Edit1Change(Sender: TObject);
var x,y:double;
begin
 if  TryStrToFloat(StringReplace(Edit1.Text,',','.',[]),x)
 and TryStrToFloat(StringReplace(Edit2.Text,',','.',[]),y)
 then Label1.Caption:='Длина: '+Format('%10.2f',[sqrt(sqr(x)+sqr(y))]) else
   Label1.Caption:='Не определено...';
end;


procedure TForm1.FormCreate(Sender: TObject);
begin
  Edit1.OnChange:=Edit1Change;
  Edit2.OnChange:=Edit1Change;
end;

end.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
функция редактирования MyLifeStyle Общие вопросы C/C++ 2 23.05.2014 14:57
Запрет редактирования записи в БД Liite БД в Delphi 14 29.03.2013 12:04
Переписать с сохранением порядка следования компоненты файла F1 в файл F2, а компоненты файла F2 - в файл Алексей_1 Паскаль, Turbo Pascal, PascalABC.NET 0 20.05.2011 13:37
ЗАПРЕТ РЕДАКТИРОВАНИЯ ПОЛЯ Cone Microsoft Office Excel 12 01.02.2011 14:29
запрет редактирования AnGrig Компоненты Delphi 3 18.10.2007 11:37