Dwa komunikaty

0

Witam. Mam takie pytanie. W momencie kiedy Tabela jest zamknięta
(dcInactive), a mimo to użytkownik uruchamia wyszukiwarkę i próbuje odnaleźć jakiś rekord, pojawia się komunikat z informacją, że musi otworzyć bazę i tam takie... Ale po tym moim komunikacie pojawia się komunikat systemowy (win98). Jak wyeliminować komunikat systemowy?
[code]procedure TForm5.Button7Click(Sender: TObject);
var
Tytul:string[35];
begin

if Table1.State=dsInactive then
Application.MessageBox('Baza jest zamknięta . Musisz najpierw otworzyć bazę !',
Informacja',MB_IconInformation + MB_OK);

if table1.state=dsbrowse then
Tytul:=InputBox('Wyszukaj film wg tytułu','Podaj Tytuł:',Tytul);

if Table1.Locate('Tytul',Tytul,[LoCaseInsensitive,LoPartialKey])
then
ShowMessage ('Znleziono szukany tytuł '+Table1['Tytul'])
else
ShowMessage ('Brak szukanego tytułu '+Tytul);
[/code]

0

Może jeśli baza jest zamknięta, to nie próbuj się do niej odwoływać, tylko wyjdź z procedury używając exit.

0

thenkles dzięki pomogło, problem rozwiązany. upał straszny masz [browar]

1 użytkowników online, w tym zalogowanych: 0, gości: 1