Есть ли в Билдери какие-либо средсватва для того чтоб динамически создавать компаненты, а еще лучше динамически дублировать созданую панель со всеми компонентами на ней(так чтоб к ним мложно было обращатся).
Основная задача:
нужно сделать пругу в которой на понели отображаются (разным образом) информация взятая из фаила, количество понелияй не известно до запуска программы!

Надеюсь понятно. Может кто поможет советом или направит на инфу по этой теме!
Зарание спасибо!!!!

это сретсвотва окень прастаоео:
TPanel* panel = new TPanel(NULL);
и всьое

Это сообщение отредактировал(а) _hunter - 6.7.2005, 17:01

да но только не просто TPanel а та класс которой уже готов (тк кам еще и копоненты)

Для этих целей вместо панелей лучше юзать фреймы

А кстати возникал у меня такой же вопрос ...

может поможете с логичным завершением этого вопроса ?
создавать то я панели , создавал :
( TPanel* panel = new TPanel(Form1); ) ,
загонял их в TList ,
а вот как к ним , к каждому , прицепить обработку WM_MOUSEMOVE ?

я прицеплял обработчик на одну(последнюю созданную) панель
, а вот обрабатывать все панели по отдельности не смог ...

я делал так :

SetWindowLong(указатель на окно?, GWL_WNDPROC, (long)NewWindowProc);

Где NewWindowProc , это :

LRESULT CALLBACK NewWindowProc(HWND hWnd, UINT msg, WPARAM w,
LPARAM l)
{
if (msg == WM_PAINT)
{
// Your code here
}
return CallWindowProc((FARPROC)Form1->OldWindowProc, hWnd, msg, w, l);
}

ЗЫ
да и кстати а как их (эти панели) удалять корректно то после ?

при завершеннии приложения они , каж-ся, сами удаляться,
а про обработку чето я в код не вьехал

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

насчёт кода : так если бы я сам в него въехал я бы не спрашивал
просто указывал с помощью SetWindowLong через Хэндл , при создании новой панельки , свой обработчик NewWindowProc ...
только не заладилось что то , он обрабатывает только последнюю панель ...

удалять
panel->free()

Это сообщение отредактировал(а) maddoc - 11.7.2005, 16:50

Можно ещё вопрос ?

динамически всё создаётся , отслеживаются события , а вот как динамический компонент "хватать" (драг это наверное ...) какие события , или что вообще для этого надо ?

хватать = обращаться, или перетаскивать?

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

я делал так :

Код

void __fastcall TForm1::Panel1MouseDown(TObject *Sender,       TMouseButton Button, TShiftState Shift, int X, int Y) { TPanel* MyPanel; MyPanel = ((TPanel*)Sender);     ReleaseCapture();     MyPanel->Perform(WM_SYSCOMMAND ,0xF012,0); }

но тогда я не смог отследить события :
"начал тащить" и "закончил тащить"
зато всё корректно двигалось и по позиции курсора можно было бы определить что именно делать : менять размер или двигать ...
Вот если бы отследить начало и конец MouseDrag'a ...
К сожалению изза ReleaseCapture(); он перестаёт обрабатывать сообщения панели , а по другому я не смог ....

Сорри я Дэбыл !

сам же и отвечаю на свой вопрос :

Код

void __fastcall TForm1::Panel1MouseDown(TObject *Sender,       TMouseButton Button, TShiftState Shift, int X, int Y) { TPanel* MyPanel; MyPanel = ((TPanel*)Sender);     ReleaseCapture();     if (Y < 10 )//какое то условие     {       MyPanel->Perform(WM_SYSCOMMAND ,0xF003,0);//ресайзим     }     else     {       MyPanel->Perform(WM_SYSCOMMAND ,0xF012,0);//двигаем     } MyOnEndDrag();//вот он OnEndDrag ! }

Добавлено @ 14:16

Цитата(_hunter @ 6.7.2005, 16:59)

это сретсвотва окень прастаоео: TPanel* panel = new TPanel(NULL); и всьое

может не стоило то так жестоко ?
человек честно использовал транслит ,
не у всех есть русский на клаве ...
я сам первый месяц по русски печатать просто не мог , а транслитом такой ужас получается иногда .