Текущий архив: 2013.09.01;
Скачать: CL | DM;
Вниз
полоса прокрутки для TPanel Найти похожие ветки
← →
SKIPtr © (2012-12-17 23:44) [0]подскажите как
компоненты помещеные на Panel выходят за границу
как включить полосу прокрутки
← →
KilkennyCat © (2012-12-18 00:31) [1]TScrollBox
← →
SKIPtr © (2012-12-18 08:32) [2]а есть где нибудь пример как связать ScrollBox с Panel
← →
MBo © (2012-12-18 08:55) [3]зачем связывать? ScrollBox вместо панели.
← →
SKIPtr © (2012-12-18 20:52) [4]
> ScrollBox вместо панели.
а как на ScrollBox разместить несколько TLabel
← →
KilkennyCat © (2012-12-18 21:03) [5]а что, только одну получилось?
странно. обычно две-три легко. трудности начинаются после четвертой.
но ходят слухи, что кому-то удалось разместить 42-е, после чего чувак исчез.
← →
SKIPtr © (2012-12-18 21:22) [6]нол сетаки как разместить на ScrollBox другие компоненты
про то как на Panel много рассказываеться гугл сразу дает
а про ScrollBox не одного примера
только как сколером длину круга менять и все
← →
Игорь Шевченко © (2012-12-18 22:13) [7]Можно вот так
unit main;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
ScrollBox1: TScrollBox;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.object Form1: TForm1
Left = 0
Top = 0
Caption = "Form1"
ClientHeight = 293
ClientWidth = 426
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = "Tahoma"
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object ScrollBox1: TScrollBox
Left = 20
Top = 20
Width = 369
Height = 209
VertScrollBar.Position = 8
TabOrder = 0
object Label1: TLabel
Left = 16
Top = 12
Width = 31
Height = 13
Caption = "Label1"
end
object Label2: TLabel
Left = 16
Top = 36
Width = 31
Height = 13
Caption = "Label2"
end
object Label3: TLabel
Left = 16
Top = 64
Width = 31
Height = 13
Caption = "Label3"
end
object Label4: TLabel
Left = 16
Top = 92
Width = 31
Height = 13
Caption = "Label4"
end
object Edit1: TEdit
Left = 16
Top = 120
Width = 121
Height = 21
TabOrder = 0
Text = "Edit1"
end
object Edit2: TEdit
Left = 16
Top = 152
Width = 121
Height = 21
TabOrder = 1
Text = "Edit2"
end
object Edit3: TEdit
Left = 16
Top = 184
Width = 121
Height = 21
TabOrder = 2
Text = "Edit3"
end
end
end
← →
Dennis I. Komarov © (2012-12-18 22:33) [8]
with TLabel.Create(Self) do begin
Parent := ScrollBox1;
End;
← →
Тесть Птибурдукова (2012-12-19 01:05) [9]
> SKIPtr © (18.12.12 21:22) [6]
> как разместить на ScrollBox другие компоненты
Так же, как и на панели.
← →
Германн © (2012-12-19 02:17) [10]
> про то как на Panel много рассказываеться гугл сразу дает
> а про ScrollBox не одного примера
> только как сколером длину круга менять и все
>
Больно слышать.
(с) ИШ
← →
icWasya © (2012-12-19 09:41) [11]>только как сколером длину круга менять и все
Не путай ScrollBar и ScrollBox.
ScrollBox - это та же панель, только с полосами прокрутки.
ScrollBar - это собственно полоса прокрутки и есть.
← →
SKIPtr © (2012-12-19 09:41) [12]сделал серовно не то
> Тесть Птибурдукова (19.12.12 01:05) [9]
> Так же, как и на панели.
на панель босаеш компонент и он на ней остаеться
на сколере не остаеться падает на форму
> Игорь Шевченко © (18.12.12 22:13) [7]
> Можно вот так
> Dennis I. Komarov © (18.12.12 22:33) [8]
> with TLabel.Create(Self) do beginParent := ScrollBox1;End;
>
попробывал и правда ставиться
но когда при выполнении двигаеш сколером
компоненты исчезают
и сколер такой большой а внутри компонент
а сколер должен быть рядом с компонентом
← →
SKIPtr © (2012-12-19 09:45) [13]
> Не путай ScrollBar и ScrollBox.
о спасибо я и правда ставил ScrollBar
а на какой вкладке находиться ScrollBox
Страницы: 1 вся ветка
Текущий архив: 2013.09.01;
Скачать: CL | DM;
Память: 0.5 MB
Время: 0.008 c
