Показать сообщение отдельно
  #2  
Старый 18.06.2010, 16:47
Black Raider Black Raider вне форума
Местный
 
Регистрация: 31.05.2010
Адрес: Москва
Сообщения: 466
Версия Delphi: 7
Репутация: 40
По умолчанию

по поводу названия:
в форме с PageControl в разделе public пишем переменную
Код:
NameTab:string;
рисуем форму2 с едитом и 2 кнопками. на кнопку сохранить вешаем обработчик :
Код:
form1.NameTab:=Edit1.text;
close;

Динамическое создание вкладок:
Код:
var IDTab:integer;
procedure TForm1.Button1Click(Sender: TObject);
var tn:TTabSheet;
begin
  NameTab:='';
  form2.showmodal;
  if length(trim(NameTab))>0 then begin
    tn:=TTabSheet.Create(PageControl1);
    tn.Name:='MyTab'+inttostr(IDTab);
    tn.Caption:=NameTab;
    IDTab:=IDTab+1;
    tn.PageControl:=PageControl1;
  end;
end;

2.Сохранить проще всего в INI.
Ответить с цитированием