Bin relativer Delphianfänger und arbeite auch an der Programmierung eines Taschenrechners.
Nun hab ich ihn in soweit schon fertig, was mir lediglich noch fehlt ist die Klammerrechnung.
Dafür trage ich die einzelnen Rechenschritte in ein Memofeld ein. Nun soll das Programm jedoch die Klammern erkennen und alles was dazwischen liegt in einen Hilfsspeicher (Edit3) tun. Mein Problem ist, dass ich nicht weiß, wie man in das Editfeld alles reinschrieben kann, was in dem Memofeld zwischen beispielsweise der vierten und achten Zeile liegt, so wie man das bei dem Memofeld über den 'Add-Befehl' machen kann. So wie ich es programmiert habe, zeigt er nämlich nur die letzte Zeile des Memofeldes in der Edit3 an. Hoffe auf Hilfe! Dankeschön!!!
Hier mein Quellcode:
Code:
for Zeile:=0 to memo1.Lines.Count-1
do begin
if memo1.Lines[Zeile][1]='(' then Klammerbefehl:=1;
if memo1.Lines[Zeile][1]=')' then Klammerbefehl:=0;
if Klammerbefehl=1
then begin
for Buchstabe:=1 to length (memo1.Lines[Zeile])
do edit3.text:=memo1.Lines[Zeile]
end;
end;