Как мне сделать ползунок ?

[wolfgrey21]

Я работаю в Delphi 7 . Нужно сделать ползунок в определенном месте . При том что BordrStyle:=bsNone . Вот еще скриншот для лучшего понятия что мне нужно . В поле(где выделонно красным) нужно будет вводит текст и Memo можете не предлагать так как оно испортит весь дизайн программы .Жду ответа.

[beegl]

там есть компонент MediaSlider, TrackBarEx, возможно, такие, что Вам нужны

[wolfgrey21]

Сообщение от beegl

там есть компонент MediaSlider, TrackBarEx, возможно, такие, что Вам нужны

Не могли бы вы мне по подробней объяснить где эти компоненты находятся или как их установить. Заранее спасибо.

[beegl]

компилировал под Delphi7

[wolfgrey21]

Сообщение от wolfgrey21

Я работаю в Delphi 7 . Нужно сделать ползунок в определенном месте . При том что BordrStyle:=bsNone . Вот еще скриншот для лучшего понятия что мне нужно . В поле(где выделонно красным) нужно будет вводит текст и Memo можете не предлагать так как оно испортит весь дизайн программы .Жду ответа.

Еще забыл добавить как сделать текстовое поле с ползунком (который будет выглядить так как я хочу) и чтоб при нажатий на кнопку или картинку(TImage) появлялся текст в текстовом поле . Пробывал в Label но там нету ползунка. А в Memo нельзя напишать простым кодом : "Lbl1.Caption:='Текст'; Или как присвоить ползунок в Label.

[beegl]

procedure TForm1.TrackBar1Change(Sender: TObject);
begin
Label1.Caption := IntToStr(TrackBar1.Position);
end;
end.