AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi Bestimmte Zahlenfolge aus Listbox im Label per count zeigen

Bestimmte Zahlenfolge aus Listbox im Label per count zeigen

Ein Thema von Hallo_Thomas · begonnen am 19. Apr 2005 · letzter Beitrag vom 19. Apr 2005
Antwort Antwort
Hallo_Thomas

Registriert seit: 18. Apr 2005
Ort: Dresden
405 Beiträge
 
Delphi 2005 Professional
 
#1

Bestimmte Zahlenfolge aus Listbox im Label per count zeigen

  Alt 19. Apr 2005, 17:19
Da ich aktuelle Items in meiner Listbox oben angebe, gebe ich folgenden Befehl ein:


Anzeige.Items.Insert(0, a);

Meine Countdarstellung erfolgt im Moment so:


Label1.Caption:=IntToStr(Listbox1.Items.Count);


Problem:
Ich hätte gern einen Count der bei den Zahlen 1,3,7 mitzählt,
sollte eine 6 kommen sollte wieder auf NULL springen.

Dankeschön
  Mit Zitat antworten Zitat
Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#2

Re: Bestimmte Zahlenfolge aus Listbox im Label per count zei

  Alt 19. Apr 2005, 17:22
Lauf mit einer Schleife durch die Listbox, und inkrementiere einen Counter bei bestimmten Zahlen, oder resette ihn bei anderen.

Greetz
alcaeus
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat
Hallo_Thomas

Registriert seit: 18. Apr 2005
Ort: Dresden
405 Beiträge
 
Delphi 2005 Professional
 
#3

Re: Bestimmte Zahlenfolge aus Listbox im Label per count zei

  Alt 19. Apr 2005, 17:29
Ich bin da noch blutiger anfäner, wie soll das gehen?
  Mit Zitat antworten Zitat
Benutzerbild von alcaeus
alcaeus

Registriert seit: 11. Aug 2003
Ort: München
6.537 Beiträge
 
#4

Re: Bestimmte Zahlenfolge aus Listbox im Label per count zei

  Alt 19. Apr 2005, 17:32
Delphi-Quellcode:
var
  i, Counter: Integer;
begin
  Counter := 0;
  for i := 0 to ListBox1.Count-1 do
  begin
    if StrToInt(ListBox1.Items[i]) in [1,3,7] then
      Inc(Counter)
    else if StrToInt(ListBox1.Items[i] = 6 then
      Counter := 0;
  end;
end;
Ueber den Einbau und die Erweiterung lass ich dich nachdenken....

Greetz
alcaeus
Andreas B.
Die Mutter der Dummen ist immer schwanger.
Ein Portal für Informatik-Studenten: www.infler.de
  Mit Zitat antworten Zitat
Hallo_Thomas

Registriert seit: 18. Apr 2005
Ort: Dresden
405 Beiträge
 
Delphi 2005 Professional
 
#5

Re: Bestimmte Zahlenfolge aus Listbox im Label per count zei

  Alt 19. Apr 2005, 17:45
sieht erstmal gut aus, werds heut abend gleich mal probieren,

Dankeschön
  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 16:18 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