[ALexandr555]

как нам при закрытии программы сохранить вкладки в памяти программы, чтоб при открытии они были сного.

[eXplorer]

а какие вкладки? можно пояснить...

[ALexandr555]

вкладки на PageControl

[v1s2222]

Просто сохранить их не удасться, надо или записывать их в файл настроек...или в реестр... ну или в сам ЕХЕ файл (но это сложнее)...

[ALexandr555]

имеешь ввиду записывать название сохранять до последней а потом при открытии в том же порядке создавать?

[eXplorer]

да... только так наверно можно

[Electronic_Arts]

Вот пример сохранения и чтения без всяких хлопот

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

//Сохранить var FS: tfilestream; begin FS := TFileStream.Create( 'vkladki.opt', fmCreate ); FS.WriteComponent( PageControl1 ); FS.Free; end;   //Загрузка var FS: tfilestream; begin FS := TFileStream.Create( 'vkladki.opt', fmOpenRead ); PageControl1 := FS.ReadComponent( PageControl1 ) as TPageControl; FS.Free; end;

[ALexandr555]

эмм ну я думаю не прокатит сохранить закрыть приложение потом открыть и загрузить, и у меня их несколько вкладок

[Electronic_Arts]

Почему не прокатит - еще как прокатит ты пробуй
а вообще есть возможность? покажи скрин проги - скажу получиться или нет
но в любом случае должно получится

В указанном коде программа сохранит состояние вкладки - в прочем все что с ним связано..

[v1s2222]

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

эмм ну я думаю не прокатит сохранить закрыть приложение потом открыть и загрузить, и у меня их несколько вкладок

Код что был дан выше сохранит ВСЕ вкладки...:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

//Сохранить var FS: tfilestream; begin FS := TFileStream.Create( 'vkladki.opt', fmCreate ); FS.WriteComponent( PageControl1 ); FS.Free; end;   //Загрузка var FS: tfilestream; begin FS := TFileStream.Create( 'vkladki.opt', fmOpenRead ); PageControl1 := FS.ReadComponent( PageControl1 ) as TPageControl; FS.Free; end;

Просто при выключении программы выполняйте сохранения вкладок, а при включении программы - загрузку (по коду выше).