Delphi-PRAXiS
Seite 2 von 3     12 3      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi label´s zählen (https://www.delphipraxis.net/97395-label%B4s-zaehlen.html)

Luckie 9. Aug 2007 22:11

Re: label´s zählen
 
Wenn ich ein Buch ins Regal stelle, dann weiß ich doch, dass ich es rein gestellt habe und kann es mir merken. Dazu muss ich doch nicht alle fünf Minuen das ganze Regal durchgucken.

Hansa 9. Aug 2007 22:37

Re: label´s zählen
 
Luckie, das ist zu wenig. :stupid: Gehe ich hin und ersetze eines der X-Bücher durch ein Y-Buch, was dann ? Du gehst dann hin und guckst wieviele X-Bücher angeblich da sind und die Zahl stimmt nicht. Übrig bleibt dann nur : neu zählen. :mrgreen:

Luckie 9. Aug 2007 22:46

Re: label´s zählen
 
Ähm, du meinst also ich lasse dich in mein Wohnzimmer und an mein Regal? Dann musst du erst an meinem Kampfkaninchen vorbei. :mrgreen:

Und wen ich es mache, weiß ich dass ich ein x-Buch rausgenommen habe. ;)

1234588 9. Aug 2007 22:48

Re: label´s zählen
 
ersetzt man ein x-buch durch ein y-buch, kann man (logischerweise) davon ausgehn, das nun ein x-buch weniger im regal steht. wozu nachzaehlen wenn man weiß, das ein x-buch entfernt wurde?

Hansa 9. Aug 2007 22:58

Re: label´s zählen
 
Zitat:

Zitat von 1234588
.. wozu nachzaehlen wenn man weiß, das ein x-buch entfernt wurde?

Wenn das Wörtchen "wenn" nicht wäre. Im Netzwerk trifft grundsätzlich immer "wenn" zu. :mrgreen:

mkinzler 10. Aug 2007 05:39

Re: label´s zählen
 
Um beim Beispiel einer Bibliothek zu bleiben, man kann
- beim Ausleih-/Rückbringvorgang den Aus-/Eingang verbuchen
- das Fach mit den gewünschten Büchern per Kamera überwachen oder ( Events)
- jemanden regelmässig zum Zählen schicken

oki 10. Aug 2007 06:34

Re: label´s zählen
 
Hi,

ich stimme Hansa zu. Ersetzt man nämlich ein X-Buch durch ein X-Buch, so wird der Zähler incrementiert. Die Anzahl der Bücher bleibt aber gleich! Auf deutsch, gibt man in ein Edit noch mal den gleichen Text ein, so wird OnChange ausgeführt und der Zähler erhöht.

denke ich zumindest. Ausprobiert hab ich es nicht. :gruebel:

Also ich würde wie Hansa neu zählen.

Gruß oki

[edit] offensichtlichste Rechtschreibfehler korrigiert. [/edit]

SirThornberry 10. Aug 2007 06:39

Re: label´s zählen
 
@oki: Die Annahme ist falsch.
Zitat:

Delphi-Quellcode:
begin
  Dec (XAnzahl, Ord(DeinLabel.Caption = 'X'));
  DeinLabel.Caption := NeueCaption;
  Inc (XAnzahl, Ord(DeinLabel.Caption = 'X'));
end;

es wird decrementiert wenn es ein X-Buch war
und es wird wieder incrementiert wenn es danach ein X-Buch ist.

War also vorher ein X-Buch und nachher wieder wird erst decrementiert dann incrementiert und raus kommt 0 - also keine Veränderung.

Zum Thema FindComponent hab ich erst kürzlich folgendes geschrieben:
Zitat:

Ich bin der Meinung FindComponent sollte man nur einsetzen wenn es ohne suche nicht geht. Ansonsten ist es unglücklich programmiert und eine Verschwendung von Ressourcen.
Im realen Leben wirft ja auch keiner seinen Autoschlüssel nach hinten über die Schulter irgendwo hinn um ihn später zu suchen. Da legt man den Autoschlüssel auch dort hinn wo man ihn später nicht suchen braucht.
Es muss natürlich auch Programmierer geben welche FindComponent verwenden damit die neueste Generation der Rechner auch Absatz findet und diese möglichst stark augelastet werden

oki 10. Aug 2007 07:16

Re: label´s zählen
 
@ SirThornberry:

Das erste Dec hatte ich übersehen :P somit geb ich dir dann uneingeschränkt recht.

Auch auf die Gefahr hin, dass es jetzt etwas OT wird.
In diesem Fall gebe ich den Feinden von FindComponent recht. Zur Designzeit erstellte Labels muß man für diese Funktionalität nicht zwingend mit FindComponent suchen. Aber was ist generell so schlecht an FindComponent? Ich erstelle in einem recht großen Projekt visuelle Kompos zur Laufzeit. Components ist doch auch nur ein Container. Lege ich einen eigenen an, so sehe ich zu Components keinen Unterschied. Eine Suche müßte ich auch bei meinem Container implementieren. Also müsste es schon erhebliche Probleme mit FindComponent geben, damit ich mir die Arbeit eines eigenen Containers und die dafür notwendigen Funktionen mache.

Gruß oki

MasterTobi 10. Aug 2007 09:37

Re: label´s zählen
 
Guten Morgen


man ihr seit chaoten :-D
so

hm hilft mir net wirklich weiter p.s. ich bin anfänger in sachen delphi.

hm
ich wollte eig nur das :

wenn label2.caption und oder label1, label3, label4 ..... label13 ='x' dann edit1.text = //anzahl der 'x'//

ich bin so dumm!

mfg


Alle Zeitangaben in WEZ +1. Es ist jetzt 13:50 Uhr.
Seite 2 von 3     12 3      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz