AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Daten löschen

Ein Thema von benny · begonnen am 8. Jun 2008 · letzter Beitrag vom 8. Jun 2008
Antwort Antwort
Seite 1 von 2  1 2      
benny

Registriert seit: 24. Mai 2008
16 Beiträge
 
#1

Daten löschen

  Alt 8. Jun 2008, 11:48
Daten einer Tabelle (ParadoxTabelle) werden in einem DBGrig aufgelistet. Zwischendurch sollen neue Daten importiert und vor dem Import sollen die alten gelöscht werden. Das Löschen der Daten funktioniert nicht, die Fehlermeldung ist "Datei im Gebrauch, Löschen nicht möglich". Wie kann ich das Problem am besten lösen ?

benny
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Daten löschen

  Alt 8. Jun 2008, 11:50
TTable.EmptyTable;
Markus Kinzler
  Mit Zitat antworten Zitat
benny

Registriert seit: 24. Mai 2008
16 Beiträge
 
#3

Re: Daten löschen

  Alt 8. Jun 2008, 12:01
die Löschprozedur lautet:
procedure Tform1.table2leeren;
begin
With table2 do begin
if active=true then close;
close;
Exclusive := TRUE;
Active := TRUE;
EmptyTable;
Active := False;
Exclusive :=False;
open;
end;
end;

bei "EmptyTable" erfolgt der Programmausstieg.
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#4

Re: Daten löschen

  Alt 8. Jun 2008, 12:16
Hallo...

Delphi-Quellcode:
procedure Tform1.table2leeren;
begin
With table2 do begin
if active=true then close;
close;
Exclusive := TRUE;
Active := TRUE;
EmptyTable;
Active := False;
Exclusive :=False;
open;
end;
end;
es reicht...
Delphi-Quellcode:
procedure TForm1.tabelle2leeren;
begin
  Table2.EmptyTable;
end;
Zitat:
"Datei im Gebrauch, Löschen nicht möglich".
...kommt vom Exclusive := TRUE;
  Mit Zitat antworten Zitat
benny

Registriert seit: 24. Mai 2008
16 Beiträge
 
#5

Re: Daten löschen

  Alt 8. Jun 2008, 12:37
jetzt schreibt er mir: "Tabelle nicht exclusiv Modus geöffnet", ich weiß wirklich nicht weiter ???
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
 
Delphi 11 Alexandria
 
#6

Re: Daten löschen

  Alt 8. Jun 2008, 12:39
Verwende SQL

Btw. Nimm lieber ein anderes DBMS, denn die BDE ist veraltet und wird seit Jahren nicht mehr weiterentwickelt
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von haentschman
haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.388 Beiträge
 
Delphi 12 Athens
 
#7

Re: Daten löschen

  Alt 8. Jun 2008, 12:47
BDE ist schon eine kleine Weile her...

die Tabelle sollte schon vor dem Leeren geöffnet sein...
probiere mal...
Delphi-Quellcode:
procedure TForm1.tabelle2leeren;
begin
  Table2.Active:= True; // bzw. vorher (On Create / OnShow) einfach aktiv machen.
  Table2.EmptyTable;
end;
mit welchen Datenzugriffskomponenten arbeitest du ?
greifst du mit mehreren Clients auf die Tabelle zu ?
  Mit Zitat antworten Zitat
Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#8

Re: Daten löschen

  Alt 8. Jun 2008, 12:56
Das Close ist zweideutig. Schreibe mal "Table2." überall hin und kommentiere die with-Zeile aus. Würde mich nicht wundern, wenn...
Gruß
Hansa
  Mit Zitat antworten Zitat
benny

Registriert seit: 24. Mai 2008
16 Beiträge
 
#9

Re: Daten löschen

  Alt 8. Jun 2008, 13:05
wie gesagt die Daten werden zur Laufzeit in eimen DBGrig aufgelistet und er reist die Daten, glaube ich, an sich heran, lösche ich ihn aus der Maske so funktioniert das Löschen einwandfrei.
In einem Monat stellen wir unsere Programme auf ADS-Datenbank um, bis dahin muss ich mich aber noch mit der BDE quälen !!
  Mit Zitat antworten Zitat
Apollonius

Registriert seit: 16. Apr 2007
2.325 Beiträge
 
Turbo Delphi für Win32
 
#10

Re: Daten löschen

  Alt 8. Jun 2008, 13:27
@Hansa: Es ist eindeutig geregelt, dass das innere With vor dem äußeren kommt (falls es mehrere gibt) und erst ganz am Ende Self.
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz