🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.lang.delphi.bazy-danych
Article #70195

Dziwne rzeczy po "Record locked by another user"

#70195
From: Ryszard
Date: Thu, 21 Jun 2007 18:25
26 lines
1740 bytes
Stacja A edytuje sobie rekord nr 1.
Stacja B startuje aplikacje i rowniez chce edytować ten sam rekord nr 1:

Form1.OnShow
   Tabela.Edit;
   nastepna linia kodu
   jeszcze jedna linia ...
end;

Po wykonaniu Tabela.Edit oczywiscie otrzymuje komunikat "Record locked
by another user". Po zaakceptowaniu komunikatu jednak sterowanie nie
powraca do nastepna linia kodu, lecz robi sobie Exit z obsługi zdarzenia
OnShow (!), przez co pomija kilka istotnych procedur.

Jesli jednak Stacja B wybierze sobie teraz inny rekord do edycji, a
nastepnie powroci do edycji naszego rekordu nr1 (caly czas edytowanego
przez Stacje A), to po otrzymaniu komunikatu Record locked ... , tym
razem poslusznie wykonuje nastepne linie kodu po Table.Edit.

Takie rzeczy jak NetDir, PrivDir, LocalShare=True sa ustawione OK.

Aha, to wszystko na Paradox 7, Delphi4.

Ktos ma jakis pomysl, bo ja juz tydzien nad tym siedze i nic...

Ryszard
Technical Details
Message-ID: <f5eftv$4dn$1@atlantis.news.tpi.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!opal.futuro.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!opal.futuro.pl!news.internetia.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: Ryszard <rkzamed@o2.pl>
Newsgroups: pl.comp.lang.delphi.bazy-danych
Subject: Dziwne rzeczy po "Record locked by another user"
Date: Thu, 21 Jun 2007 20:25:55 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 26
Message-ID: <f5eftv$4dn$1@atlantis.news.tpi.pl>
NNTP-Posting-Host: tr.ssnet.com.pl
Mime-Version: 1.0
X-Trace: atlantis.news.tpi.pl 1182450431 4535 83.18.221.147 (21 Jun 2007 18:27:11 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Thu, 21 Jun 2007 18:27:11 +0000 (UTC)
User-Agent: Thunderbird 1.5.0.12 (Windows/20070509)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit