Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.23;
Скачать: CL | DM;

Вниз

Проблема с отображением MDIСhild   Найти похожие ветки 

 
KSN ©   (2006-04-07 17:40) [0]

Как сделать чтобы формы с FormStyle fsMDIChild, после создания имели такой же размер какой они имеют при дизайне?


 
ctudent ©   (2006-04-08 00:23) [1]

ИНИ файлы надо учить!
Создаёшь ИНИ файл, в котором указываешь размеры формы.
При выполнени приложения загружаешь этот ИНИ файл.

Вот примерный кусок кода:

procedure TForm1.WriteParams; // Запись в ИНИ-файл размеров формы
var
IniFile:TIniFile;
begin
IniFile:=TIniFile.Create("c:\spssuda\systsh\conf.ini");
IniFile.WriteString("services","n_organ",suiEdit2.Text);
IniFile.WriteString("services","chet",suiEdit3.Text);
IniFile.WriteString("services","polog",suiEdit6.Text);
IniFile.WriteString("services","tel",suiEdit7.Text);

аналогично вызываеется ReadPArams; // Загрузка из ИНИ-файла размеров формы


 
Германн ©   (2006-04-08 02:01) [2]


> ctudent ©   (08.04.06 00:23) [1]
>
> ИНИ файлы надо учить!
> Создаёшь ИНИ файл, в котором указываешь размеры формы.
> При выполнени приложения загружаешь этот ИНИ файл.
>
> Вот примерный кусок кода:
>
> procedure TForm1.WriteParams; // Запись в ИНИ-файл размеров
> формы
> var
> IniFile:TIniFile;
> begin
> IniFile:=TIniFile.Create("c:\spssuda\systsh\conf.ini");
> IniFile.WriteString("services","n_organ",suiEdit2.Text);
>
> IniFile.WriteString("services","chet",suiEdit3.Text);
> IniFile.WriteString("services","polog",suiEdit6.Text);
> IniFile.WriteString("services","tel",suiEdit7.Text);
>
> аналогично вызываеется ReadPArams; // Загрузка из ИНИ-файла
> размеров формы


Ппперевведи!
Где тут размеры?


 
ctudent ©   (2006-04-08 02:16) [3]

> ctudent ©   (08.04.06 00:23) [1]
>
> ИНИ файлы надо учить!
> Создаёшь ИНИ файл, в котором указываешь размеры формы.
> При выполнени приложения загружаешь этот ИНИ файл.
>
> Вот примерный кусок кода:
>
> procedure TForm1.WriteParams; // Запись в ИНИ-файл размеров
> формы
> var
> IniFile:TIniFile;
> begin
> IniFile:=TIniFile.Create("c:\spssuda\systsh\conf.ini");
> IniFile.WriteString("services","n_organ",suiEdit2.Text);
>
> IniFile.WriteString("services","chet",suiEdit3.Text);
> IniFile.WriteString("services","polog",suiEdit6.Text);
> IniFile.WriteString("services","tel",suiEdit7.Text);
>
> аналогично вызываеется ReadPArams; // Загрузка из ИНИ-файла
> размеров формы

Ппперевведи!
Где тут размеры?

Данный пример дан абстрактно!

Вот пример как надо:

procedure TForm1.WriteParams;
Var IniFile:TIniFile;
begin
IniFile:=TIniFile.Create("project.ini");
IniFile.WriteInteger("FORM1","Form1Top",Form1.Top);
IniFile.WriteInteger("FORM1","Form1Left",Form1.Left);
IniFile.WriteInteger("FORM1","Form1Height",Form1.Height);
IniFile.WriteInteger("FORM1","Form1Width",Form1.Width);
IniFile.WriteString("FORM1","Edit1Text",Edit1.Text);


 
Германн ©   (2006-04-08 02:22) [4]

Не ну, а как решить сабж:

> Как сделать чтобы формы с FormStyle fsMDIChild, после создания
> имели такой же размер какой они имеют при дизайне?


 
ctudent ©   (2006-04-08 02:26) [5]


>  Как сделать чтобы формы с FormStyle fsMDIChild, после создания
>
> > имели такой же размер какой они имеют при дизайне?


Что значит имеют при дизайне?


 
Германн ©   (2006-04-08 02:53) [6]


> ctudent ©   (08.04.06 02:26) [5]

Спроси у автора. Я то тут причём?


 
vovnuke ©   (2006-04-08 11:21) [7]

Position := poDefaultPosOnly;



Страницы: 1 вся ветка

Текущий архив: 2006.04.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.033 c
1-1142596234
Dust
2006-03-17 14:50
2006.04.23
Скачал Indy 10, не могу установить


3-1140986958
vital538
2006-02-26 23:49
2006.04.23
Использование динамических библиотек


4-1138956993
hgd
2006-02-03 11:56
2006.04.23
Подскажите о методе нажатия кнопку в другом приложении


1-1142875448
KALqYAN
2006-03-20 20:24
2006.04.23
Picture Change...


15-1144059580
balepa
2006-04-03 14:19
2006.04.23
Как можно "Ваше имя" сменить ?