Kleiner Taschenrechner: Immer vom Guthaben abziehen.

chriss1988 · Beiträge: 389 windows xp prof,home,windows98 delphi5

hi

ich hab ein programm geschrieb oder veruche es das so ein art rechner ist. ich gebe in edit1 und 2 eine zahl ein die gibt er mir dan in edit3 aus.

nur hab ich da ein problem. also ich geb als edit2 2000 ein und dan möchte ich das er mir immer von den 2000 abzieht.

z.b.
2000-100->edit3 dann 1900
beim nächsten rechnen soll er dan zb
1900-500->1400 rechnen doch das macht ern nicht sondern rechnet von den 2000 wieder.

we kann ich das problem lösen????

Moderiert von Tino: Titel geändert und überflüssige Zeilenumbrüche entfernt.

Gausi · Verfasst: Mi 21.12.05 10:19

Tja, ganz einfach, würde ich sagen. Schreib in Edit1 1900 rein und in Edit2 die 400. Oder nimm als Grundlage für deine Rechenoperationen nicht das, was in Edit1 steht, sondern eine Variable, die du beim ersten Rechnen mit dem Wert aus Edit1 initialisierst und dann immer wieder durch das Ergebnis der Rechnung ersetzt.

_________________
We are, we were and will not be.

chriss1988 · Beiträge: 389 windows xp prof,home,windows98 delphi5

das programm soll wie ein geuhaben rechner funktionieren du hast en startwert, den du am anfang selbst eingeben kannst und von dem immer wier en betrag x abgezogen wird.

Gausi · Verfasst: Mi 21.12.05 10:32

Mal ein paar Codefetzen, die mir grad dazu einfallen:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

var
meinGuthaben: integer;
ersteRechnung: boolean;

//im OnCreate
ersteRechnung := True;

// in der Rechnen-Prozedur
if ersteRechung then 
begin
  meinGuthaben := StrToInt(Edit1.text)
  ersteRechnung := False;
end;
meinGuthaben := meinGuthaben - StrToInt(Edit2.Text);

_________________
We are, we were and will not be.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme