![]() |
wie kann ich das 1. zeichen eines edits löschen ?
folgendes problem : ich will bei einem taschenrechner die + / - taste einbauen nur jetzt bleib ich hängen wenn ich von - nach + machen will kann mir da jemand helfen mit delete oder so ?
hier schonmal das was ich gemacht habe:
Delphi-Quellcode:
x:=strtoint(edit1.text);
if (x > 0) then x:=-x; edit1.Text:=inttostr(x) else if (x < 0) then begin if pos( '-', Edit1.Text ) = 1 then edit1.Text:=inttostr(x); |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Delphi-Hilfe -> "Delete"
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Meinst Du positiv und negativ umschalten?
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
komme da nicht zurecht kannste mir nicht ein beispiel geben ? da gibt es 50 delete methoden ...
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
ja genau deddyh ;)
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Delphi-Quellcode:
x:=strtoint(edit1.text);
// if (x > 0) then x:=-x; edit1.Text:=inttostr(x) (* else if (x < 0) then begin if pos( '-', Edit1.Text ) = 1 then edit1.Text:=inttostr(x); *) |
Re: wie kann ich das 1. zeichen eines edits löschen ?
hmmm was wolltest du mir damit zeigen ?
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Zitat:
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Naja, ich glaub das Beispiel von Deddy löst sein Problem schon. Mit Delete muss er da nicht groß rumhantieren.
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
So wird aus positiv negativ und umgekehrt.
Wenn Du unbedingt negativ haben willst, geht das z.B. so:
Delphi-Quellcode:
x:=strtoint(edit1.text);
x := -abs(x); edit1.Text:=inttostr(x); |
Re: wie kann ich das 1. zeichen eines edits löschen ?
ja deddyh das hatte ich ja auch hingekriegt aber wenn man nochmal drauf klickt soll das wieder verschwinden und das muss man abfragen ...
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
und ich weiss gerade nicht wie ich das abfragen soll weil in x ist ja der negative wert und ich kann ja nicht -x abfragen weil die variable x ist oder ?
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Zitat:
Delphi-Quellcode:
Grüße
procedure TForm1.Button1Click(Sender: TObject);
var x : Integer; begin x:=StrToInt(Edit1.Text); // z.B. -2 bzw: 2 x:=-x; // 2 -2 edit1.Text:=IntToStr(x); // 2 -2 end; Klaus |
Re: wie kann ich das 1. zeichen eines edits löschen ?
was ist denn wenn ich von minus wieder nach plus möchte das funzt so nicht klaus ?
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Delphi-Quellcode:
Mathematik der fünften Klasse. :?
procedure TForm1.Button1Click(Sender: TObject);
var x : Integer; begin x:=StrToInt(Edit1.Text); // z.B. -2 bzw: 2 x:= x * -1; // 2 -2 edit1.Text:=IntToStr(x); // 2 -2 end; |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Auch wenn ich 24karatboy Posts auch etwas wenig aussagekräftig und noch weniger bemüht finde, möchte ich doch anmerken, daß Delete hier nicht passt, da Text eine Property ist, Delete aber ein Variablen-, kein Konstantenobjekt erwartet (oder wie diese schöne Fehlermeldung noch gleich heißt) ;)
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
das hab ich gesucht ;) die einfachste mathe regel und ich komme nicht drauf ...
danke euch allen |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Warst du in der Schule? Da lernt man: Minus und Minus ergibt Plus.
-x - -x = +x |
Re: wie kann ich das 1. zeichen eines edits löschen ?
jemand ein paar vorschläge was man noch so einbauen könnte ?
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Den "Beenden" Knopf
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Zitat:
-x - -x = 0 |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Ja ... :wall:
Wenigstens die Kernaussage stimmt. :mrgreen: |
Re: wie kann ich das 1. zeichen eines edits löschen ?
da war wohl jemand in der schule aber hats nicht richtig gelernt ;)
-x - -x = -2x -x * -x = x den beenden knopf habe ich schon aber nen hotkey wäre nicht schlecht das sich das programm bei strg+b beendet ? |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Zitat:
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
Zitat:
edit: Da war kein Kasten! Ehrlich! |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Praktische Mathematik war noch nie meine Stärke. :oops:
@24karatboy: Dein Programm hat schon so einen Hotkey: Alt+F4 |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Naja,
Zitat:
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
-x * -x = x²
Windows-Rechner ftw :mrgreen: |
Re: wie kann ich das 1. zeichen eines edits löschen ?
Bei den binomischen Formeln isses dann ganz vorbei. :mrgreen:
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
so weit möchte ich mit meinen taschenrechner nicht gehen ;)
|
Re: wie kann ich das 1. zeichen eines edits löschen ?
@deddyH:
(a+b)² = a²+b²+2ab; (a-b)² = a²+b²-2ab; (a+b)(a-b) = a²-2ab+2ab-b² = a²-b²; :zwinker: naja :? wenn ich mir die rechenvorschläge hier mal so ansehe... die gehirnzellen sterben mit dem altern wohl wirklich ab [wichtig]Das war keine beleidigung nur etwas sarkastischer humor :mrgreen: [/wichtig] |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:03 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 by Thomas Breitkreuz