Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   zeiterfassung (https://www.delphipraxis.net/155874-zeiterfassung.html)

khh 11. Nov 2010 10:39

zeiterfassung
 
hallo zusammen,
ich weiss zwar nicht ob das hier in dieses Forum gehört, habb aber kein passenderes gefunden.

Hat jemand von euch Erfahrung mit bestimmter Hardware zur Zeiterfassung, und eine solche schon mal an sein Programm angebunden?

Es gibt ja ne unübersehbare Anzahl von Anbietern der Hardware, da wäre mir ein "Erfahrungsbericht" schon recht..
Danke Gruss KHHH

Satty67 11. Nov 2010 10:49

AW: zeiterfassung
 
Arbeitszeiterfassung... mit Karten-Stempelsystem oder ist was anderes gemeint?

khh 11. Nov 2010 10:52

AW: zeiterfassung
 
Zitat:

Zitat von Satty67 (Beitrag 1060887)
Arbeitszeiterfassung... mit Karten-Stempelsystem oder ist was anderes gemeint?



ich denke Stempelkarten sind relativ veraltet.
Ich denk eher an Fingerprint oder Gesichtserkennung, oder per Schlüssel.

Satty67 11. Nov 2010 10:58

AW: zeiterfassung
 
Mit Stempelkarte war natürlich eine Magnetkarte gemeint, je nach Bereich sicher nicht unüblich. Aber bei Gesichtserkennung oder Fingerprint muss ich passen, wird bei uns nur im Bereich der Werkstatt und Lager eingesetzt (also Magnetkarten). Ist u.U. technisch noch mit Chipkarten vergleichbar, mit den anderen Auth-Methoden eher nicht mehr.

s.h.a.r.k 11. Nov 2010 11:10

AW: zeiterfassung
 
Die Idee mit dem Fingerprint finde ich gar nicht so dumm, hab darüber bisher noch nicht nachgedacht... Mein Lenovo W500 hat ja so ein nettes Features, welches ich aber nicht wirklich nutze. Das Ding lässt sich sicherlich via API ansprechen. ABER dabei gilt es sehr viele Probleme zu beachten: was wenn jemand gerade von Mc kommt und seine Hände nicht gewaschen hat? Den mag das nicht sonderlich stören, aber die Dame dahinter schon ziemlich ;) In einer Autowerkstatt ebenso undenkbar -- kannst ja nicht jeden zwingen die Hände zu waschen. Ebenso finde ich das im Bezug auf Krankheiten auch so eine Sache.

Würde auf jedenfall etwas auswählen, was nicht unbedingt auf Berührung basiert -- z.B. Gesichtserkennung. Wobei ich diese Technik ganz ehrlich für zu problematisch halte. Kann hier aber auch nicht sagen, wie hoch die Trefferquote ist. Das Problem dabei dürfte wohl sein, dass das Personal sich dran gewöhnen muss und evtl. vom Programm aufgehalten werden kann -> Frust.

Was ich ganz nett finde ist dieses RFID-Gedöns oder auch eine Chipkarte. Es gibt ja schon so kleine Dinger, die man sich an den Schlüsselbund hängen kann (so groß wie eine Euro-Münze), sodass man das eben immer dabei hat. Robust (auch gegen Schmutz), auch in ein paar CM Entfernung auslesbar und mann unter Umständen auch Daten auf dem Chip speicher (es z.B. als Geldkarte nutzen).

-- EDIT

Ist jetzt nur mal schnell vor mich hin erzählt: Jeder Mensch hat heute ein Handy (dreiste Behauptung, ich weiß). Das Handy selbst soll dauerhaft "pingbar" sein, vorzugsweise via Bluetooth, da Bluetooth eine geringe, aber ausreichende Reichweite hat. Kommt der Arbeiter morgens, dann muss er ja durch den Eingang und wird somit aufgenommen, Status: aktiv. Wenn der Arbeiter geht kommt er erneut an dem Eingang vorbei, Status: inaktiv. So könnte ich mir das im einfachsten Szenario vorstellen, wobei es dabei noch sehr viele Hürden gibt :) Nur mal als Idee.

khh 11. Nov 2010 11:56

AW: zeiterfassung
 
Zitat:

Zitat von s.h.a.r.k (Beitrag 1060902)
Die Idee mit dem Fingerprint finde ich gar nicht so dumm, hab darüber bisher noch nicht nachgedacht... Mein Lenovo W500 hat ja so ein nettes Features, welches ich aber nicht wirklich nutze. Das Ding lässt sich sicherlich via API ansprechen. ABER dabei gilt es sehr viele Probleme zu beachten: was wenn jemand gerade von Mc kommt und seine Hände nicht gewaschen hat? Den mag das nicht sonderlich stören, aber die Dame dahinter schon ziemlich ;) In einer Autowerkstatt ebenso undenkbar -- kannst ja nicht jeden zwingen die Hände zu waschen. Ebenso finde ich das im Bezug auf Krankheiten auch so eine Sache.

Würde auf jedenfall etwas auswählen, was nicht unbedingt auf Berührung basiert -- z.B. Gesichtserkennung. Wobei ich diese Technik ganz ehrlich für zu problematisch halte. Kann hier aber auch nicht sagen, wie hoch die Trefferquote ist. Das Problem dabei dürfte wohl sein, dass das Personal sich dran gewöhnen muss und evtl. vom Programm aufgehalten werden kann -> Frust.

Was ich ganz nett finde ist dieses RFID-Gedöns oder auch eine Chipkarte. Es gibt ja schon so kleine Dinger, die man sich an den Schlüsselbund hängen kann (so groß wie eine Euro-Münze), sodass man das eben immer dabei hat. Robust (auch gegen Schmutz), auch in ein paar CM Entfernung auslesbar und mann unter Umständen auch Daten auf dem Chip speicher (es z.B. als Geldkarte nutzen).

-- EDIT

Ist jetzt nur mal schnell vor mich hin erzählt: Jeder Mensch hat heute ein Handy (dreiste Behauptung, ich weiß). Das Handy selbst soll dauerhaft "pingbar" sein, vorzugsweise via Bluetooth, da Bluetooth eine geringe, aber ausreichende Reichweite hat. Kommt der Arbeiter morgens, dann muss er ja durch den Eingang und wird somit aufgenommen, Status: aktiv. Wenn der Arbeiter geht kommt er erneut an dem Eingang vorbei, Status: inaktiv. So könnte ich mir das im einfachsten Szenario vorstellen, wobei es dabei noch sehr viele Hürden gibt :) Nur mal als Idee.

Ich denke für den geplanten Fall würden sich die Dinger am Schüsselanhänger am ehesten eignen.
Die Idee mit dem Handy finde ich gut. Nur wie soll da die technische Umsetzung funktionieren, gibt es dazu hardwaremässig was ?

mkinzler 11. Nov 2010 11:59

AW: zeiterfassung
 
Eine klassische Chipkarte hat den Vorteil, dass man sie auch zur Authentifizierung im Netz verwenden kann ( ist mit Zusatzhardware sicherlich auch mit RFID-Token möglich)

Bummi 11. Nov 2010 12:02

AW: zeiterfassung
 
RFID - "Schlüsselanhänger" lassen sich problemlos einbinden, ich habe leider den Code gerade nicht zur Hand...melde mich aber auf Wunsch gerne noch mal.

khh 11. Nov 2010 12:03

AW: zeiterfassung
 
Zitat:

Zitat von Bummi (Beitrag 1060924)
RFID - "Schlüsselanhänger" lassen sich problemlos einbinden, ich habe leider den Code gerade nicht zur Hand...melde mich aber auf Wunsch gerne noch mal.


das wäre sehr nett von dir

Vielen Dank

Gruss KHH

s.h.a.r.k 11. Nov 2010 12:04

AW: zeiterfassung
 
Zitat:

Zitat von khh (Beitrag 1060920)
Die Idee mit dem Handy finde ich gut. Nur wie soll da die technische Umsetzung funktionieren, gibt es dazu hardwaremässig was ?

Ich denke, dass das eher ein Fall für Studenten ist ;) Außer du hast echt viel Zeit. Dass es sowas in der realen Umgebung gibt, glaube ich nicht, da es einfach zu viele Probleme geben wird imho. Die Idee ist schön, die Umsetzung sehr schwer. Zumal du immer vor dem Problem stehen wirst: was machst du wenn einer sein Handy nicht dabei hat? Oder überhaupt gar keines besitzt?

Nicht umsonst werden Chipkarten und RFIDs dermaßen häufig eingesetzt -> am besten in der Praxis.

Bummi 11. Nov 2010 12:21

AW: zeiterfassung
 
@khh
mein Code bezieht sich auf
FEIG ELECTRONIC GmbH
OBIT ; uralt und sicher optimierungsbedürftig
Delphi-Quellcode:
unit OBID_Thread;

interface
uses Windows,Classes,FECOM,FERWA;
Type
T_2=Array [0..1] of Char;
T_256=Array [0..255] of Char;



TTagStatus=Record
Key:Double;
Schrank:Integer;
Locked:Boolean;
Valid:Boolean;
Batterie:Integer;
end;

TPollBuffer=Record
cPollAction: T_2;
cTrAdr: T_2;
cSendPollData: T_256;
cPollValid: T_2;
cRecPollData: T_256;
end;

TCallBackFunc=Procedure(Status:TTagStatus);
Type

TOBID_Thr=Class(TThread)
  private
  PollBuffer:TPollBuffer;
  FCallBackFunc:TCallBackFunc;
  FPortHandle,FReader:Integer;
  FDelay:Integer;
  TagStatus:TTagStatus;
  FLastKey:Double;
  protected
    procedure CallCallBack;
    Function ReadTag:Boolean;
    procedure Debug;
  public
    procedure Execute; override;
    constructor Create(CallBack:TCallBackFunc;Port:Pchar;Delay:Integer);
    Destructor Destroy;override;
  end;

var
  ObidThread:TOBID_Thr;

implementation
Uses Dialogs;

Constructor TOBID_Thr.Create(CallBack:TCallBackFunc;Port:Pchar;Delay:Integer);
    begin
    FDelay:=Delay;

    FPortHandle:=FECOM_OpenPort(Port);
    FCallBackFunc:=CallBack;
    if FPortHandle>0 then
       begin
       FReader:=FERWA_NewReader(FPortHandle);
       end;
    FLastKey:=-1;

    inherited Create(False);
    end;

Destructor TOBID_Thr.Destroy;
    begin
    ObidThread:=nil;

    Try
    if FPortHandle>0 then
       begin
       FERWA_DeleteReader(FReader);
       FECOM_ClosePort(FPortHandle);
       end;
    except end;

    inherited Destroy;
    end;

Procedure TOBID_Thr.Execute;
var
I:Integer;
begin
i:=0;
FreeOnTerminate:=true;
While not Terminated do
      begin


      try

      If ReadTag then
         begin
         if FlastKey=-1 then
            begin
            FLastKey:=TagStatus.Key;
            Synchronize(CallCallBack);
            end;
         end else FLastKey:=-1;
      except
        inc(i);
        if i>10 then
          begin
          i:=0;
          Synchronize(Debug)
          end;
      end;

      Sleep(FDelay);
      end;
end;

procedure TOBID_Thr.Debug;
begin
  MessageDLG('OBID Tagreader funktioniert in aktueller Konfiguration nicht einwandfrei und wird deaktiviert',mtWarning,[mbok],0);
  Terminate;
end;

procedure TOBID_Thr.CallCallBack;
begin
  FCallBackFunc(TagStatus);
end;

Function TOBID_Thr.ReadTag:Boolean;
var
iDataType: Integer;
I:Integer;
d:Double;
begin
PollBuffer.cPollAction:=#0#2;
PollBuffer.cTrAdr:=#0#2;
i:=FERWA_0x01_MultiJobPollAndState(FReader,0, PollBuffer.cPollAction,PollBuffer.cTrAdr,PollBuffer.cSendPollData,PollBuffer.cPollValid,PollBuffer.cRecPollData,0);
TagStatus.Valid:=i=0;
Result:=TagStatus.Valid;
if TagStatus.Valid then
   begin
   TagStatus.Key:=0;
   d:=1;
   For i:=1 to 5 do
       begin
       TagStatus.Key:=TagStatus.Key+Ord(PollBuffer.cRecPollData[6-i])*d;
       d:=d*256;
       end;
   PollBuffer.cTrAdr:=#0#0;
   PollBuffer.cPollAction:=#0#2;
   i:=FERWA_0x03_AdvMultiJobPollAndState(FReader,0, PollBuffer.cPollAction,PollBuffer.cTrAdr,PollBuffer.cSendPollData,PollBuffer.cPollValid,PollBuffer.cRecPollData,0);
   TagStatus.Valid:=i=0;
   Result:=TagStatus.Valid;
   TagStatus.Schrank:=Ord(PollBuffer.cRecPollData[2])*256+Ord(PollBuffer.cRecPollData[3]);
   TagStatus.Locked:=PollBuffer.cRecPollData[5]=#3;
   TagStatus.Batterie:=Integer(Ord(PollBuffer.cRecPollData[6]));
   FERWA_0x75_SetOutput(FReader,0,$10,$10,$2,$0); // BEEP
   end;
end;

end.

s.h.a.r.k 11. Nov 2010 12:22

AW: zeiterfassung
 
*autsch* Häng doch einfach eine *.pas-Datei an ;) Das macht deinen Beiträg wesentlich übersichtlicher!

Bummi 11. Nov 2010 12:24

AW: zeiterfassung
 
@s.h.a.r.k
sorry:thumb:

Nersgatt 11. Nov 2010 12:29

AW: zeiterfassung
 
Wir haben RFID-Leser von Interflex bei einem Kunden. Das funktioniert gut. Wir können in unserer eigenen Software die Chips lesen und sogar Türberechtigungen schreiben. Der Kunde hat eine Unterkunft mit mehreren 100 Zimmern. Und die Leute, die dort wohnen, werden von unserer Software verwaltet, da lag es nah, dass wir auch die RFID-Chips beschreiben.
Die Türen haben alle RFID-Leser und lassen sich mit den Chips öffnen.

khh 11. Nov 2010 12:30

AW: zeiterfassung
 
Zitat:

Zitat von Bummi (Beitrag 1060930)
@khh
mein Code bezieht sich auf
FEIG ELECTRONIC GmbH
OBIT ; uralt und sicher optimierungsbedürftig

ich danke dir, werd mir das mal zu Gemüte führen


Gruss KHH

angos 11. Nov 2010 12:49

AW: zeiterfassung
 
Hi,

ich habe recht gute Erfahrung mit TMC und auch Datafox

Es kommt da halt immer darauf an was man genau möchte

Gruß

khh 12. Nov 2010 10:09

AW: zeiterfassung
 
ich danke euch

Gruss KHH


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:59 Uhr.

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