Цитата(nestandart @ 2.7.2011, 12:56  ) | 1. Как выровнять строки в Memo к правому краю? Или это можно в чём то другом?
Собственно нужно вывести текст с правокрайним ровнением. |
| Код |
type
TNewEdit = class(TEdit)
private
procedure CreateParams(var Params: TCreateParams); override;
end;
...
procedure TNewEdit.CreateParams(var Params: TCreateParams);
begin
inherited;
Params.Style := Params.Style or ES_RIGHT
end;
|
| Цитата(nestandart @ 2.7.2011, 12:56 ) | 2. Как сделать "резиновую" форму так, что бы всё её содержимое (хотя бы кнопки) "резинились" тоже?
Т.е. минимальный размер задан, а увеличение происходит при раздвигании всей формы. Ну типа в процентном отношении...
Если при этом можно растягивать ещё и шрифты во всём остальном (напр. Edit) - было бы просто замечательно. |
| Код |
ChangeScale(2, 1) // Увеличит в 2 раза форму и все дочерние компоненты
|
В окошке Structure перетащить ее в ветку RadioGroup или вырезать кнопку, выделить RadioGroup и вставить уже в него.
| Цитата(nestandart @ 2.7.2011, 12:56 ) | | 3. Как прикрепить (см. картинку) этот вот выделенный обьект в RadioGroup, что бы он при перетаскивании не отлеплялся? В смысле при редактировании... |
|
