Arbeitsstunden prüfen (delphie)

[H3rti]

Hi!
Ich will ein Programm schreiben das mir Anzeigt wie viele Stunden Arbeit ich noch machen muss.
Beispiel maximal 30 Stunden Eingabe 23 ShowmEssage es fehlen 7 Stunden . Nur ich weis nicht wie das geht. Hilfe bitte!

[Matze]

Moin, bitte ändere den Titel, er ist nicht aussagekräftig.

Ich verstehe nicht ganz. So fasse ich es auf, als ob du einfach 2 (Integer-) Zahlen subtrahieren möchtest. :gruebel:


Nachtrag: Herzlich willkommen!

[alias5000]

eigentlich ganz einfach:

Delphi-Quellcode:

Procedure ShowTime(DoneWork: integer); //cooler Titel :-)  donework in Stunden
begin
showmessage('Du musst noch ' + inttostr(30 - DoneWork) + ' Stunden harte Plagen auf dich nehmen');
end;

Dann musst du die Procedur nur noch aufrufen und die Stundenzahl übergeben, die du schon hinter dir hast.

War es das?

Gruß alias5000

[H3rti]

Wie krieg ich denn diese ShowTime procedure dahin ? Finde ich das bei den events?

[Vjay]

Also ich denke minimales Verständnis und minimale Arbeitsbereitschaft dürfen Antworten in der Delphi-Praxis schon erfordern.
Wenn du ein fertiges Programm möchtest, bzw. erledigte Hausaufgaben, beauftrage einen Entwickler oder schreibe von deinem Sitznachbarn ab.

[dahead]

die musst du entweder selber schreiben, oder so kopieren wie oben genannt.

wenn bspw. dein Hauptformular Form1 heisst, kannst du es auch noch zusätzlich in die private Deklaration aufnehmen, um sie überall in dieser Unit anzusprechen.

Delphi-Quellcode:

unit Unit1;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
    procedure ShowTime(DoneWork: integer);
  public
    { Public declarations }
  end;
 end;

...

procedure TForm1.ShowTime(DoneWork: integer);
begin
  showmessage('Du musst noch ' + inttostr(30 - DoneWork) + ' Stunden harte Plagen auf dich nehmen'); 
end;

...

procedure TForm1.Button1Click(Sender: TObject);
begin
 ShowTime(10);
end;

end.

[Vjay]

Nun hast du H3rti's Hausaufgaben erledigt. H3rti, der noch nicht mal Delphi richtig schreibt.
Na ein Glück - zu morgen äh heute noch geschafft.

[H3rti]

-_- Leute. Ich schreibe übermorgen ne Delphi Arbeit und keine Hausaufgaben. Ein Lehrer meinte zu mir ich sollte soeine Aufgabe üben. Srry das ic hdas Thema ansprach denn solche antworten sind ..

[H3rti]

lächerlich Vjay auf welche Tippfehler du achtest.

[dahead]

Als erledigt würde ich das nicht betrachten. Es fehlt immerhin noch die Implementierung der aktuellen Uhrzeit bzw. der Beginn/das Ende der Arbeitszeit.

Außerdem kann ich mir schlecht vorstellen, dass sowas eine Hausaufgabe ist. Falls doch, er verlangt (im Gegensatz zu manchen Jessicas oder Jacquelines hier im Forum - denen bereitwillig geholfen wird) nicht die komplette Lösung, sondern will nur wissen, wie er das einbauen soll.

Ich gebe dir in dem Punkt recht, als dass er noch einiges an Grundlagen zu lernen hat.