AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Delphi listbox2 täglich automatisch auswerten
Thema durchsuchen
Ansicht
Themen-Optionen

listbox2 täglich automatisch auswerten

Ein Thema von thorstenf01 · begonnen am 25. Mär 2004
Antwort Antwort
thorstenf01

Registriert seit: 10. Jul 2003
Ort: Kiel
34 Beiträge
 
#1

listbox2 täglich automatisch auswerten

  Alt 25. Mär 2004, 08:21
Hallo,
wer kann mir bei folgendem Problem helfen:
ich habe zwei Listboxen, wobei die Listbox 2 fast die Gestalt der Listbox 1 annehmen soll.
In Listbox 1 stehen errechnete Werte, die in dieser Form erhalten bleiben soll.
In der Listbox 2 wird ein digitales Signal, in Form einer "1" umgewandelt.
Diese "1" wird über eine Serielle Schnittstelle an das Programm übergeben.
Der Abfrageintervall ist 5 Minuten, in denen bei Schattenwurf in eine Zeile in der Listbox 2
geschrieben wird und bei keinem Schattenwurf wird kein Eintrag erfolgen.
Das Programm läuft über einen längeren Zeitraum. (z.B 6 Monate)
Die Daten der Listbox 2 werden automatisch alle 30 Min. in eine Textdatei gespeichert.
Nun der eigentliche Punkt:
Gibt es eine Routine, die nach Vorbild von Listbox 1 den Abschattungsbeginn, das Abschattungsende und
die Belastungszeit in der Listbox 2 ermittelt. D.h. es muß nach einem Tag der erste Wert als Abschattungsbeginn
und der letzte Wert des Tages als Abschattungsende ausgegeben werden. Außerdem soll die Differenz aus
Abschattungsbeginn und Abschattungsende als Belastungszeit ausgegeben werden.
Die Einträge Uhrzeit, Anschlußpin und Schattenwurf fallen weg.



Listbox 1

Code:
                    Auswertung des Schattenwurfs                  

Tag     Datum       Abschattungsbeginn      Abschattungsende Belastungszeit

_______________________________________________________________________________ 

107     16  Apr             7,02 Uhr               7,02 Uhr          0,0 min

108     17  Apr             6,58 Uhr               7,23 Uhr         24,7 min

109     18  Apr             6,55 Uhr               7,25 Uhr         30,0 min
 
110     19  Apr             6,53 Uhr               7,27 Uhr         34,3 min

111     20  Apr             6,51 Uhr               7,29 Uhr         37,8 min

112     21  Apr             6,49 Uhr               7,30 Uhr         40,9 min

113     22  Apr             6,47 Uhr               7,31 Uhr         43,5 min

114     23  Apr             6,46 Uhr               7,32 Uhr         45,8 min
Listbox 2

Code:
                     Abfrage des Detektors                  

Datum     Uhrzeit        Anschlußpin      Schattenwurf vorhanden

_______________________________________________________________________________ 

16 Apr    7,02 uhr           DTR                ja

17 Apr    6,58 uhr           DTR                ja

17 Apr    7,03 uhr           DTR                ja

17 Apr    7,08 uhr           DTR                ja

17 Apr    7,03 uhr           DTR                ja

17 Apr    7,08 uhr           DTR                ja

17 Apr    7,13 uhr           DTR                ja

17 Apr    7,18 uhr           DTR                ja

17 Apr    7,23 uhr           DTR                ja

18 Apr    6,55 uhr           DTR                ja
Danke im voraus

Gruß
Thorsten
  Mit Zitat antworten Zitat
Antwort Antwort


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 04:25 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