-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
öhm naja...12. Klasse, aber eben erst seit einer Woche Delphi...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
hmm, ich glaube das mit den Texpressions kann ich nicht lassen...da würde mein lehrer dann wohl doch stutzig werden
er lernt ja delphi selbst noch, und ob er das überhaupt kennt!?
ich werd wohl probieren müssen, das durch 2 stacks zu ersetzen...einen mit char und einen extended, auch wenn es ziemlich umständlich scheint
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
super, das ist ja noch besser...ich seh es mir gleich mal an
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
wow, danke für deine mühe!!!
aber alzaimar hat schon ganz recht TExpression haben wir noch nicht gelernt, werd mir aber mal probieren das anzulesen...
kopiere jetzt erst einmal deinen code in mein Programm...
dankee
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
also ich komm leider i-wie nicht weiter...
wenn ich davon ausgehe, dass bei der postfix-notation natürlich auch mehrere zahlen nebeneinander stehen können...
...da hab ich mir gedacht, lese ich solange die zeichen aus dem stack heraus und schreibe sie in einen zweiten, bis ein operationszeichen kommt- das wird aber nicht in den 2. stack geschrieben..
danach hole ich die letzten beiden...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
wenn ich dashinbekommen hab, dass mehrere zahlen nebeneinander stehen können, poste ich mal das prog...
...aber ich denke, das wird alles sehr unsauber für euch sein.
könntest du das mit dem speicher freigeben viellt. mal kurz näher erläutern?
noch etwas, was uns nicht gesagt wurde... :x
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
genau so ist es...klappt bisher auch alles ganz gut
nur hab ich meinen Programmcode nicht ganz vollständig geschrieben, da ich davon ausgegangen war, dass in der postfix-notation maximal 2 zahlen nebeneinander stehen können...aber dem ist ja nicht so...
muss ich jetzt noch erweitern
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
1. Mär 2008
die pop funktion erzeugt bei mir bei
result:=zkopf^.inhalt;
einen fehler
wieder diese exeption fehlermeldung sobald ich nen wert eingebe und auf berechnen klicke...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
ich möchte schon c b a als ergebnis haben...
aber das würde meiner meinung nach nicht herauskommen, wenn ich deine pop funktion verwende...zumindest nicht mit meiner push funktion...
meine push funktion baut sich ja so auf, das nach dem pushen von a b c der zeiger zkopf immernoch auf a steht...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
gut, das aufbauen nach hinten würde in meinem fall noch sinn machen...aber das abbauen von vorne wäre dann eher angebrachter, weil ich gleich an das erste element wieder ran muss...
werd jetzt einfach von vorne die elemente weg nehmen...is schon spät und ich hab keine lust mehr :wall:
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
aber nein, ich seh ja grad, dass deine pop funktion ja wieder das erste element entfernt...wollte ich ja nicht
eigentlich ist das mit der 2. liste ja eh sinnlos...müsste ja einfach immer nur das erste wegnehmen, ich weiß nicht, warum wir das unbedingt von hinten abbauen sollen
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
ich weiß nicht, ich glaube wir sollten das aus i-einem grund immer am ende einfügen...den sinn seh ich aber grad auch nicht
probiers gleich mal mit deiner vorgeschlagenen prozedur
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
nein, würde ich jetzt nicht sagen...
denn, wenn zkopf das erste element ist und pop jeweils das letzte entfernen und freigeben soll muss ich ja solange in der liste weitergehen, bis ein element auf nil zeigt, oder?
bei mir hängts im moment an der letzten zeile der pop prozedur
FUNCTION pop(VAR zkopf:tzeiger):char;
VAR zhilf1,zhilf2:tzeiger;
BEGIN
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
ich hab noch ein kleines problem...
und zwar, wenn ich nun eine zweite liste erzeuge und dort soll die erste in umgekehrter reihenfolge hineingeschrieben werden.....
dafür habe ich zkopf und zkopf2 in der ersten unit deklariert...die waren vorher gar nicht deklariert
allerdings bekomme ich jetzt immer diese fehlermeldung: Unit1.pas(51): Die Typen der tatsächlichen und formalen...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
genau, danke...ich hoffe jetzt pack ich auch was allein
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
nein, eigentlich sollte es immer das erste sein...aber das ist ja eigentlich kein aufwand, oder?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
aber müsste nicht das:
zkopf := zhilf;
ganz vor, als letzte zeile der ersten fallunterscheidung?
sonst könnte ich ja nie mehr auf das erste element zugreifen!?
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
super danke...schon mal kein fehler
werd mir das mal genauer anschauen, damit ich verstehe, warum bei mir immer der Fehler erzeugt wurde...
danke nochmal für eue hilfe
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
bitte entschuldigt, aber ich habe das auch nur von meinem lehrer vorgesetzt bekommen...und nun macht mal
hab das erst seit einer woche und wir hatten vorher nur mit pascal gearbeitet...
könntet ihr also für einen totalen delphi anfänger den fehler noch einmal zusammenfassen? und wenn es nicht allzu viel umstände macht noch einen kleinen programmcode als verbesserung?
wäre echt meine...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
wenn ich die Zeile eingebe, hängts hier
zhilf^.next:=zneu;
hier die deklaration:
TYPE tzahl=char;
tinhalt=tzahl;
tzeiger=^tknoten;
tknoten= RECORD
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
da kommt bei mir hier:
WHILE NOT (zhilf^.next=NIL) DO zhilf:=zhilf^.next;
auch ein fehler
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
naja, das ist teil eines rechners, wo ich die aufgabe in soner postfix-form eingebe...
dazu soll das eingabefeld ausgelesen werden und jedes zeichen einzeln in einen stack (die liste) geschrieben werden...
danach wird gerechnet...
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
Hier wird die Prozedur aufgerufen:
init(zkopf);
laeng:=length(edit1.Text);
FOR i:=1 TO laeng DO
BEGIN
push(zkopf,edit1.text,i);
END;
"i" übernehme ich, weil die Funktion, die prüfen sollte, ob zkopf auf NIL zeigt auch diesen exeption fehler erzeugt hatte
-
Forum: Object-Pascal / Delphi-Language
Delphi
by praesident,
29. Feb 2008
Hallo,
ich habe in der Schule beim Umstieg von Pascal auf Delphi ein Problem. Und zwar bekomme ich beim Arbeiten mit Zeigern ständig einen Exeption Fehler angezeugt.
Hier der problematische Programmteil:
PROCEDURE push(VAR zkopf:tzeiger;inhalt:char;i:byte);
VAR zhilf,zneu:tzeiger;
