AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi probleme mit dem erneuern von array inhalten

probleme mit dem erneuern von array inhalten

Ein Thema von agm65 · begonnen am 7. Mär 2008 · letzter Beitrag vom 7. Mär 2008
Antwort Antwort
Benutzerbild von agm65
agm65

Registriert seit: 21. Okt 2003
1.194 Beiträge
 
Delphi 2006 Professional
 
#1

probleme mit dem erneuern von array inhalten

  Alt 7. Mär 2008, 11:36
hi leute ich hab nen problem und komm selber nicht drauf:

Delphi-Quellcode:
 TypCountmitPad : Array [1..4] of Integer;
 TypCountohnePad : Array [1..4] of Integer;


datamod.DataModule1.CoesCountQuery.Open;

      if datamod.DataModule1.CoesCountQuery.Eof then
      begin
        datamod.DataModule1.CoesCountQuery.First;
      end;


      while not datamod.DataModule1.CoesCountQuery.Eof do
       begin

         if (datamod.DataModule1.CoesCountQuery.FieldValues['shipping_type'] = 2) then
         begin
           if (datamod.DataModule1.CoesCountQuery.FieldValues['avskey_pad'] = Null) then
             TypCountmitPad[1] := datamod.DataModule1.CoesCountQuery.FieldValues['anzahl']
           else
             TypCountohnePad[1] := datamod.DataModule1.CoesCountQuery.FieldValues['anzahl']
         end;

       datamod.DataModule1.CoesCountQuery.Next;
      end;



     mainform.lblCountNachname.Caption := 'Nachname: (' + inttostr(TypCountmitPad[1]) + '/' + inttostr(TypCountohnePad[1]) + ')' ;
ich habe insgesamt 4 von diesen blocken..hab jetzt nur 3 rausgelöscht damit es für die anzeige nicht zuviel wird..
also beim programm start stimmt die anzeige..alles ist so wie es soll...wenn ich jetzt weniger oder mehr db einträge habe und die function nochmal im progg ausführe ändert sich nichts..woran könnte das liegen ...ich vermure die array einträge werden nicht richtig überschrieben ?
euer Peter Porka
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

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

Re: probleme mit dem erneuern von array inhalten

  Alt 7. Mär 2008, 11:42
Ich verstehe die erste Abfrage auf EOf nicht? Was willst du damit bezwecken?
Markus Kinzler
  Mit Zitat antworten Zitat
NormanNG

Registriert seit: 1. Feb 2006
294 Beiträge
 
Delphi 2007 Professional
 
#3

Re: probleme mit dem erneuern von array inhalten

  Alt 7. Mär 2008, 11:43
Hi,

Delphi-Quellcode:
if (datamod.DataModule1.CoesCountQuery.FieldValues['avskey_pad'] = Null) then
  TypCountmitPad[1] := datamod.DataModule1.CoesCountQuery.FieldValues['anzahl']
else
  TypCountohnePad[1] := datamod.DataModule1.CoesCountQuery.FieldValues['anzahl']
Du überschreibst immer wieder das erste Element im Array. Ist das so gewollt?


Übrigends: das hier ist direkt nach einem Query.Open überflüssig, es ist immer der erste Datensatz aktiv:
Delphi-Quellcode:
      if datamod.DataModule1.CoesCountQuery.Eof then
      begin
        datamod.DataModule1.CoesCountQuery.First;
      end;
und: evtl. musst du die Query schließen, bevor sie erneut geöffnet wird.
Gruß
Norman
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.533 Beiträge
 
Delphi 11 Alexandria
 
#4

Re: probleme mit dem erneuern von array inhalten

  Alt 7. Mär 2008, 11:44
Und ich verstehe die Schleife nicht ganz. Wieso gehst Du alle Datensätze durch?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von agm65
agm65

Registriert seit: 21. Okt 2003
1.194 Beiträge
 
Delphi 2006 Professional
 
#5

Re: probleme mit dem erneuern von array inhalten

  Alt 7. Mär 2008, 11:53
ich muss alle datensätze durchgehen weil aus allen diese werte brauche,.,und ja ich will das array elemt immer überschreiben weil das eine anzeige ist die erneuert werden muss...aber genau das macht er ja nicht ...muss ich das array wieder freigeben am ende ?
euer Peter Porka
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 15:49 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