| vladsoft |
| Отправлено: 28.03.2005, 21:36 |
|
Не зарегистрирован
|
Почему когда работаю в run time все прекрасно, но когда компонент создал, бросил его на форму запустил и на тебе access violation in vlc50.bpl и т. д.
Долго искал причину всех этих не понятностей
и вот на что пало подозрение:
Код:
try {
if (!tv->Selected->Selected) { MessageBeep(0); return;}
}catch(...) {MessageBeep(0); return;}
TPoint coord = Mouse->CursorPos;
this->Left = coord.x;
this->Top = coord.y;
this->Name->Text=tv->Selected->Text;
__int64 recno;
tv->CurrId=(char *)tv->Selected->Data;
recno=tv->GetRecNo("id",tv->CurrId);
if (recno==-1) {
Application->MessageBoxA("Невозможно отредактировать запись", tv->EditTitle.c_str(),MB_OK);
return;
}
tv->DataSet->RecNo=recno;
this->Desc->Text=tv->DataSet->FieldByName("desc")->AsString;
// взять id пользователя и поверить с тем который запсиан в БД, чтобы определить чья это группа (личная или нет)
Visible=false;
this->ShowModal();
Этим способом я вытаскиваю id из дерева, который хранитится в Data..
tv->CurrId=(char *)tv->Selected->Data;
Может он глючит, хотя в run time все работает прекрасно.. то есть создаю свой компоент через new и наслаждаюсь, а когда создаю пакет, бросаю его на форму запускаю, то полнаю жуть... |
|
|
