Tags:
delphi
Kan man ikke lave noget som ser sådan her ud?
procedure TForm1.Edit1Change(Sender: TObject);
begin
if Edit1.Text = '' then
begin
Edit13.Text := 'result Edit1.text/4';
end;
end;
Det skal fungere sådan at når man taster et tal i edit1 skal edit13 dividere tallet i edit1 med 4
2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma
Nej, du skal først konvertere det til tal, derefter til tekst igen. Noget lignende dette:
Edit13.Text := IntToStr(StrToInt(Edit1.Text) / 4);
Dette virker dog kun med heltal, bare spørg hvis du behøver at kunne manipulere decimaltal.
0
det skal vist være <> i din if sætning ellers checker du om feltet er tomt og hvis det er så divider du det med 4 hvad i tilfælde af at det ikke crasher dit program ikke giver særligt meget mening for mig.