🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.delphi.database
Article #20

Re: Why no commit?

#20
From: Alfred ten Hoeve
Date: Sun, 20 Jul 2003 02:00
17 lines
2134 bytes
You have an IBTransaction (I suppose it's name is IBTransaction1)  component
in your DataModule or on your Form, don't you? And you linked that component
to your IBDatabase.
Drop the IBQuery.
Put an IBSQL in your DataModule and set it's transaction-property to
IBTransaction1.
In the SQL-property type: Create table employee (name : char(20)).

procedure TDataModule1.CreateMyTable;
begin
    if not IBTransaction1.InTransaction then
IBTransaction1.StartTransaction;
    IBSQL.ExecQuery;
    if IBTransaction1.InTransaction then IBTransaction1.Commit;
end;

Alfred.
Technical Details
Message-ID: <3f19f873$0$8307$4d4ebb8e@news.nl.uu.net>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!news.tu-darmstadt.de!news.belwue.de!news.uni-stuttgart.de!npeer.de.kpn-eurorings.net!newsfeed.kabelfoon.nl!195.129.110.21.MISMATCH!bnewsfeed00.bru.ops.eu.uu.net!bnewsinpeer01.bru.ops.eu.uu.net!bnewspost00.bru.ops.eu.uu.net!emea.uu.net!news.nl.uu.net!not-for-mail
References: <3f194299$0$49110$e4fe514c@news.xs4all.nl>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: ff75c,7a329eac3d9933a8
X-Google-Attributes: gidff75c,public
X-Google-Thread: f6386,7a329eac3d9933a8
X-Google-Attributes: gidf6386,public
X-Google-Thread: 115d96,7a329eac3d9933a8
X-Google-Attributes: gid115d96,public
X-Google-Thread: 10de66,7a329eac3d9933a8
X-Google-Attributes: gid10de66,public
X-Google-ArrivalTime: 2003-07-19 19:04:02 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-08!supernews.com!newsfeed.news2me.com!newsfeed.icl.net!newsfeed.fjserv.net!newsfeed.freenet.de!news.tu-darmstadt.de!news.belwue.de!news.uni-stuttgart.de!npeer.de.kpn-eurorings.net!newsfeed.kabelfoon.nl!195.129.110.21.MISMATCH!bnewsfeed00.bru.ops.eu.uu.net!bnewsinpeer01.bru.ops.eu.uu.net!bnewspost00.bru.ops.eu.uu.net!emea.uu.net!news.nl.uu.net!not-for-mail
From: "Alfred ten Hoeve" <Alfred.NoSpam@SimpelProg.nl>
Newsgroups: borland.public.delphi.database,borland.public.delphi.database.desktop,borland.public.delphi.database.multi-tier,borland.public.delphi.database.sqlservers
References: <3f194299$0$49110$e4fe514c@news.xs4all.nl>
Subject: Re: Why no commit?
Date: Sun, 20 Jul 2003 04:00:55 +0200
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4522.1200
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4522.1200
Lines: 19
Message-ID: <3f19f873$0$8307$4d4ebb8e@news.nl.uu.net>
NNTP-Posting-Host: 1Cust81.tnt32.rtm1.nld.da.uu.net
X-Trace: 1058666611 news.nl.uu.net 8307 213.116.158.81
X-Complaints-To: abuse@nl.uu.net