Hvor svært kan det være

Tags:    delphi

Jeg har mange fine bøger om Delphi en af dem koster 600 kr , men jeg skal bare finde ud af hvordan jeg kan lægge 2 tal sammen og det står ingen steder.
Altså DBEdit1 skal lægges sammen med DBEdit2 i DBEdit3.text..
Jeg har noget det virker men den laver et langt tal fx hvis der i 1 står 100 og i 2 står 100 skriver den : 100100
Hvordan gør man det ?

tarsankode



3 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
Sorter efter stemmer Sorter efter dato
Jeg har mange fine bøger om Delphi en af dem koster 600 kr , men jeg skal bare finde ud af hvordan jeg kan lægge 2 tal sammen og det står ingen steder.
Altså DBEdit1 skal lægges sammen med DBEdit2 i DBEdit3.text..
Jeg har noget det virker men den laver et langt tal fx hvis der i 1 står 100 og i 2 står 100 skriver den : 100100
Hvordan gør man det ?

tarsankode

<pre>
var
S1 : Integer;
S2 : Integer;
begin
S1 := StrToInt(Edit1.Text);
S2 := StrToInt(Edit2.Text);
Showmessage(IntToStr(S1+S2));
</pre>
Mvh. ALA



Jeg har mange fine bøger om Delphi en af dem koster 600 kr , men jeg skal bare finde ud af hvordan jeg kan lægge 2 tal sammen og det står ingen steder.
Altså DBEdit1 skal lægges sammen med DBEdit2 i DBEdit3.text..
Jeg har noget det virker men den laver et langt tal fx hvis der i 1 står 100 og i 2 står 100 skriver den : 100100
Hvordan gør man det ?

tarsankode


DBEdit3.Text := IntToStr(StrToInt(DBEdit1.Text)+StrToInt(DBEdit2.Text));

Dette forudsætter selvfølgelig at det er tal som står i DBEdit1 og 2...

Håber det hjælper,
Michael.



Jeg har mange fine bøger om Delphi en af dem koster 600 kr , men jeg skal bare finde ud af hvordan jeg kan lægge 2 tal sammen og det står ingen steder.
Altså DBEdit1 skal lægges sammen med DBEdit2 i DBEdit3.text..
Jeg har noget det virker men den laver et langt tal fx hvis der i 1 står 100 og i 2 står 100 skriver den : 100100
Hvordan gør man det ?

tarsankode

DBEdit3.Text := IntToStr(StrToInt(DBEdit1.Text)+StrToInt(DBEdit2.Text));

Dette forudsætter selvfølgelig at det er tal som står i DBEdit1 og 2...

Håber det hjælper,
Michael.


Den laver en OpdataError og lukker.
Måske fordi der står noget i den i forvejen ?
Hvad ved jeg ?

tarsankode



t