Topic: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

I NEED CODE LIKE I WANT :DATABASE.1EDIT1+DATABASE.2EDIT1=TOTAL

Re: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

I think that you should not write in capital letters and give more information on what you want to do in order to get any answers.

Re: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

i have two database :
1- database name DB1

table:price


2-database DB2

table:price
-------------
in form create
three lable (filed)edit
edit1.text=price DB1
edit2.text=price DB2

edit3.text = TOTAL

i need code whene im add data in table i see The result in Edit3.text

Re: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

Example:

procedure Form2_Edit1_OnChange (Sender: string);
var
   s1, s2: string;
begin
   s1 := Form2.Edit1.Text;
   s2 := Form2.Edit2.Text;
   if (ValidFloat(s1)) and (ValidFloat(s2)) then Form2.Edit3.Text := FloatToStr(StrToFloat(s1) + StrToFloat(s2));
end;

procedure Form2_Edit2_OnChange (Sender: string);
var
   s1, s2: string;
begin
   s1 := Form2.Edit1.Text;
   s2 := Form2.Edit2.Text;
   if (ValidFloat(s1)) and (ValidFloat(s2)) then Form2.Edit3.Text := FloatToStr(StrToFloat(s1) + StrToFloat(s2));
end;
Dmitry.

5 (edited by reber 2014-10-01 08:34:57)

Re: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

i have two table database :DB1 and DB2

I need this//       Edit Text (price) DB1   +   EditText (price)DB2   =   Total price          ////// show on Form1

Post's attachments

Attachment icon DBTEST.zip 332.42 kb, 481 downloads since 2014-10-01 

Re: I NEED CODE DATABASE1EDIT1+DATABASE2EDIT1=TOTAL

Check it.

Post's attachments

Attachment icon DBTEST.zip 2.91 kb, 522 downloads since 2014-10-01 

Dmitry.