Lazarus bzw. Programmiersprache "Pascal" problem beim erstellen eines Taschenrechners?

Hallo.

Ich bin gerade dabei einen Taschenrechner auf Lazarus mit der Programmiersprache Pascal zu programmieren.
Dennoch hab ich bei einer Sache ein Problem (bin noch Anfänger in diesem Bereich).
Und zwar schaffe ich es nicht, dass es ausgerechnet wird.
Also ich hab es erstmal mit einem label probiert.
Da schaff ich (komisch gesagt) nicht die opperatoren (+,-,*,/) von den Zahlen zu "Filtern".
Also so dass erkannt wird was davon die zahl ist und was der opperator damit das automatisch ausgerechnet wird.

2.Variante ist, ich hab 3 edits. Ein Edit für die erste zahl und eins für die zweite und eins für den opperator aber da hab ich das problem mit der virtuellen tastatur (welche dabei sein muss), da ich nicht weiß wie man da einstellt (auch nicht vom nachdenken her) dass man in das 2. edit feld schreibt wenn man die 2.zahl schreiben will. z.b. dass sobald man auf die edit fenster klickt, dass dann jede zahl die eingegeben wird nur da angezeigt wird.

Hoffe es ist einigermaßen verständlich.

Kurze zusammenfassung:
1. wie bringt man einen Taschenrechner mit Lazarus mit nur einem label wo alles reinkommt zum rechnen
2.Wie macht man es so, dass bei einer virtuellen tastatur, sobald man auf ein edit fenster klickt , alles was man klickt in dem ausgewählten edit fenster landet?

danke im Vorraus

1 Antwort

regex9

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

programmieren

11.05.2017, 21:37

Alle Eingaben, die der Nutzer in einer Textbox macht, werden in einen String gespeichert. Um zwischen Zahl und Operator zu unterscheiden, müsstest du diesen String erst parsen. Das ist aber viel zu umständlich. Verwende stattdessen Buttons.

Das verstehe ich wohl auch nicht richtig. Um zwischen den Eingabefeldern zu springen, muss der Nutzer entweder das jeweilige Feld mit der Maus oder via Tabulatortaste fokusieren. Für die Eingabefelder kannst du für letztere Möglichkeit den Tabindex setzen.

Erneut würde ich dir hier empfehlen, die Operatoren in Form von Buttons anzugeben. So hast du mehr Kontrolle über die möglichen Eingaben des Nutzers.

caner238a

Fragesteller

13.05.2017, 08:52

Inwiefern hätte ich mehr kontrolle wenn ich die Opperatoren in form von Buttons angebe? Tut mir leid bin noch nicht so vertraut mit der Programmiersprache und dem program^^

regex9

13.05.2017, 13:07

@caner238a

In ein Textfeld kann der Nutzer alles mögliche hineinschreiben und du musst daraufhin überprüfen, ob die Eingabe überhaupt eine Rechenaufgabe ist oder nicht. Das ist viel zu kompliziert.

Bei vorgegebenen Buttons dröselst du den Rechenterm auf, für die Textfelder brauchst du nur noch ermitteln, ob da eine Zahl eingegeben wurde oder nicht. Die Rechemöglichkeiten sind somit begrenzt, du weißt jederzeit, dass nur eine Subtraktion, Addition, ... auftreten kann.

Kann ich eine selbstgebaute Maschine (mit Sensoren, Pneumatik und Elektrik) so mit meinem PC "verheiraten", dass ich mir selber über beispielsweise Lazarus (Programmiersprache: Pascal) ein Steuerungsprogramm basteln kann?

Es soll ähnlich wie eine SPS funktionieren, so mit Eingang_Sensor... bla bla Ausgang_Licht an. :D Nur mal so als blödes Beispiel.

Da ich kein Profi bin, bitte ich um Nachsicht wenn ich mich etwas doof anstelle.

Vielen Dank im Voraus

...zur Frage

Informatik lk?

Ich habe Informatik als Leistungskurs und meine Frage ist, wo finde ich Abituraufgaben zum Fach Informatik ( ich habe nirgendswo Anituraufgaben gefunden )?

Die Programmiersprache ist Pascal ( Lazarus ) und Bundesland ist Saarland.

Vielen Dank

...zur Frage

Kann ich eine Datenbank in Excel ausgeben?

Ich habe mit Lazarus (in der Programmiersprache Object Pascal) eine Datenbank programmiert.

Kann ich die Datenbank Exportieren? Alternativ würde es auch reichen wenn ich die Datensätze nach einer bestimmten Spalte sortiere. Die Daten werden bereits in einem DBGrid Dagestellt

...zur Frage

Hey! Ich soll für die Hochschule Mau Mau programmieren in Lazarus (standard Delphi pascal) und weiß nicht wie ich das machen soll. Kann mir da jmd helfen?

Hey, ich muss bis Montag Mau Mau in Lazarus (Programmiersprache: standard Delphi pascal, welche die standard component von Delphi benutzt) programmieren und weiß nicht wie ich das anstellen soll. Ich habe auch Teamspeak und Skype, damit die kommunikation leichter ist.

...zur Frage

Programmiersprache: Pascal/Object Pascal, wird das noch verwendet?

Servus ihr People,

die gängigen Programme für die Sprache "Pascal/Object Pascal" sind ja Lazarus und Delphi. Eine relativ schwere Sprache (für mich), aber es macht Spaß.

Aber wird das so noch großartig benutzt? Auch im betrieblichen Umfeld? Bzw. wenn ja, für was wird das großartig verwendet? Wenn man auf das Thema "Programmieren" stößt, wird man eher mit den Begrifflichkeiten wie "C" oder "C++" oder auch "Java" konfrontiert.

Lohnt es sich, sich die Sprache noch anzueignen, oder ist das wie Latein ;)?..

Danke für die Antworten.

...zur Frage

In Pascal programmieren, wie lass ich bei einem EConvertError etwas ausgeben?

Hallo, ich bin dabei einen Taschenrechner zu programmieren (natuürlcih als Hausaufgeb), in Pascal, Lazarus als Programmierumgebung, nun arbeitete ich hier so, dass ich den in das EDIT-Feld eingegeben Text mit strToFloat zu dem Datentyp als Zahl umrechnen lasse, damit man damit rechnen kann, nun wenn da irgendwelche Buchstaben stehen kriegt man natürlich einen error und das Programm stürzt ab, wie kann ich jetzt das verhindern?

...zur Frage

Lazarus; Abbruch bzw Fehlermeldung bei ungültiger Eingabe ausgeben. Wie?

Hi. Ich bin grad dabei, bissl mit Lazarus herumzuspielen. Ich habe nun das Problem, dass ich nicht weiß, wie ich wenn man z.B. in eine Edit-Komponente nichts oder eine Zahl die kleiner ist als 2 eingibt, ich eine Fehlermeldung ausgeben lassen kann bzw das Programm sich selbstständig schließen lassen kann.

Ich weiß, dass ich zum beenden den Befehl Application.terminate brauche, aber wie mache ich das mit der bedingung?

Ich hoffe auf qualitative Antworten :) Grüße

...zur Frage

Wie programmiere ich die folgende Aufgabe in Lazarus mit der Programmiersprache: Pascal(Script)?

Aufgabe 2 – Schaumzerfall

Der Schaum in einem Bierglas zerfällt pro Minute um 15%.

a) Entwickle ein Programm, das für eine anfängliche Schaumhöhe von 13 cm die Zeit berechnet, nach der sich der Schaum auf 1 cm der Ausgangshöhe reduziert hat. Dabei soll für jede Minute die Ausgabe der verbleibenden Schaumhöhe ausgegeben werden.

b) Erweitere das Programm um die Eingabe der Variablen n, so dass die Zeit gemessen wird, bis sich der Schaum auf n cm reduziert hat. Zugleich soll die Schaumhöhe auch als Variable eingelesen werden können.

Dabei soll mit Editfeldern sowie einem Button und einem Label programmiert werden. Die Datentypen sind entweder: String ,Double oder Integer.

Vielen Dank schonmal im Voraus😁

...zur Frage

Lazarus Package aus .pas dateien erstellen?

Ich habe ein Lazarus Pkg heruntergeladen aber wie so häufig ist da drin keine fertige .lpk datei die man einfach installieren könnte sondern man muss die pas dateien selber in ein Package kompilieren welches man dann installiert das ist mir klar. Aber wie mache ich das? Kann mir einer helfen?

...zur Frage

Zwei Delphi Formulare verbinden

Hallo,

Ich habe eine Frage bzgl. wie man zwei Delphi Formulare/Unit miteinander verbindet. Als Compiler verwende ich Lazarus.

Mein Problem ist aber nicht das eigentliche Einbinden, ich habe einfach Unit2 in der Uses-Klausel hinzugefügt und das hat eigentlich auch funktioniert, ich konnte also mit einem Button über Form2.Show dieses anzeigen lassen. Ich brauche in meinem Programm aber auch so etwas wie einen Home-Button. Also wieder Form1.Show, habe ich gedacht, hat aber nicht funktioniert. Was genau mache ich falsch. ich habe auch Unit1 in die Uses Klausel eingefügt, hat jedoch nichts verändert.

Ich hoffe, hier kann mir das jemand erklären, für mich ist es nämlich komplett unverständlich...

Danke schonmal im Vorraus!!!

Lg.

...zur Frage

Kann man auf Xcode11.5 die Programmiersprache Pascal integrieren?

Hallo,
ich muss für die Uni die Programmiersprache Pascal erlernen und leider weder die letzte Version des Xcode Integration Kits nicht funktioniert, da es anscheinend zu alt ist und nur für ältere Xcode Versionen gedacht ist, noch konnte ich Lazarus öffnen. Hat da jemand einen Tipp für mich? Danke schon mal!

...zur Frage

Wie aktualisiere ich ein Label in Phyton (tkinter)?

Hey,

Ich ein Label erstellt, das den Wert der Variable zahl anzeigt(was auch funktioniert)

element = Label(fenster, text="%d" % zahl)

aber wenn ich mit einem Knopfdruck den Wert verändern will, wird es im Label nicht aktualisiert. Meine Frage ist: Wie aktualisiere ich das Label? Der Wert der Variable verändert sich tatsächlich (sieht man in der Konsole).

...zur Frage

Wieso funktioniert der Code in Lazarus nicht?

Hallo, ich lerne gerade ein wenig mit Lazarus zu programmieren.

Ich möchte dabei Hotkeys programmieren, die man außerhalb von der TForm nutzen kann. Leider funktioniert das bei meinem Programm nicht, aber ich weiß nicht, was das Problem ist.

Code:

unit unit1;
{$mode objfpc}{$H+}
interface
uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, LCLType, Windows;
type
  { TForm1 }
  TForm1 = class(TForm)
  procedure FormCreate(Sender: TObject);
  procedure FormDestroy(Sender: TObject);
  procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  private
    { Private declarations }
  public
    { Public declarations }
end;

var
  Form1: TForm1;
  HotkeyRegistered: Boolean;

implementation
{$R *.lfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  HotkeyRegistered := False;
  RegisterHotKey(Handle, 1, MOD_CONTROL or MOD_SHIFT, VK_NUMPAD1);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  if HotkeyRegistered then
    UnRegisterHotKey(Handle, 1);
end;

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
  if (ssCtrl in Shift) and (ssShift in Shift) and (Key = VK_NUMPAD1) then
  begin
    ShowMessage('Hotkey wurde gedrückt!');
  end;
end;

end.

Weiß jemand, woran das liegt?

...zur Frage

Was ist das für eine Zahl auf dem Taschenrechner?

Hallo, ich bin gerade an einer Mathe Aufgabe, wobei ich 25€ geteilt durch 5000 stk von etwas rechnen musste. Als ich das ausgerechnet habe kam das raus. Was heißt das? Und wir bekomme ich eine normale Zahl hierbei raus?

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen