Delphi Forum

]stringgrind ve bitbuton kulanarak hesap makinesi yapmak

iyi günler ben bişey soracaktım

ben stringgrind ile hesap makinesi nasıl yapabilirim aceba bende toplamanın kodlar var ama hep hata veriyor 3 adet stringrind olmalı ilkinde ilk sayı 2.de ise ikincı sayı ve 3.de ise toplamlarını yazan ...

iyi günler ben bişey soracaktım

ben stringgrind ile hesap makinesi nasıl yapabilirim aceba bende toplamanın kodlar var ama hep hata veriyor 3 adet stringrind olmalı ilkinde ilk sayı 2.de ise ikincı sayı ve 3.de ise toplamlarını yazan stringgrindler olmalı hepsının kodları ise bitbutona yazılmalı ...

esistem ve yardım etmek isteyen tum bilginlere teşekkür ederim

bende neden calısmıyor aceba yaa herhangı bir hata vermiyor
ama calısmıyor

program duzgun bir sekilde hata vermeden calıstı ama bu seferde 2 sayıyı toplıyacam sanucu vermıyor yanı işlemleri yapmıyor

hata bolum kısmında veriyor ! sonuc !yazan yerde ama ben anlıyamadım

teşekür ederim peki bunu ben nasıl duzeltecegım ve ben delphiyi daha yeni duyuyorum ve buu sebeptende hic bilmiyorum zaten bende bir tasarımcıyım sadece tasarım yapıyorum ama bu sene ole bir ders verildi hiç bişey anlıyamıyorum
yardımcı olabilirseniz sevinirım

esistem'e ve diger degerli hocalarıma,bilginlere teşekkür ederim
ama esiştem aceba hatayı neden veriyor olabilir ben bir yazım ve kod yanlışı bulamadım ama bolumun sonucunda hata vermeye baslıyor

procedure TForm1.Button1Click(Sender: TObject);
Var islem,ilk,son,ikinci,sonuc:integer;
begin
islem:=pos('+', edit1.Text); // + karakterinin text içersindeki pozisyonunu (kaçıncı karakter olduğunu buluyor)
if islem>0 then begin // eğer + karakteri varsa işlemleri yapıyor
label3.Caption:=inttostr ...

herkese cok teşekkür ederim

benim istedigim bu ama hata nerde var programda yazdıgımda hata veriyor
ben bir hata goremedim

procedure TForm1.Button1Click(Sender: TObject);
Var islem,ilk,son,ikinci,sonuc:integer;
begin
islem:=pos('+', edit1.Text); // + karakterinin text içersindeki pozisyonunu ...

zaten burdakıde basıt bir hesap makinesi
ve ben cok fonksuyonlu hesap makinesinide yapabiliyorum ama bir turlu tek edit icerisinde ve tek buton kulanarak bunları nasıl yaparım onu cok araştırdım ama boyle birşey bulamadım yanı benim istedigim sekilde yok ve ben burda yardım istiyorum bazı ...

ilk once tesekur ederim toplamayı bende biliyorum isterseniz yapılmış halınıde atarım AMA diger işlemler lazım
toplama kodlarıda bunlar
procedure TForm1.Button1Click(Sender: TObject);
Var islem,ilk,son,ikinci,sonuc:integer;
begin
islem:=pos('+', edit1.Text);
label3.Caption:=inttostr(islem);
ilk ...

tek edit içinde bir button ile dört işlem yapmak.......
copy,pos,length komutları kullanılarak yapılacak
nasıl yapabılırım yardımcı olabilirseniz sevinirim teşekürler

aslında ole demek istememiştim ve tez odevim oldugu icinde nasıl yapacagımı bilmiyorum ve delphiyide ilk defa burda bir haftadır duydum soru şeklinde yazsam daha anlaşılır olacagını dusunmuştüm teşekkürler

tek edit içinde bir button ile dört işlem yapmak.......
copy,pos,length komutları kullanılarak yapılacak