Vraag & Antwoord

Programmeren

getallen verwijderen delphi

1 antwoord
  • Ik heb een programma waar men een winkelmandje heeft. Men selecteerd een product uit de combobox en drukt op voeg toe. Zodra er op voeg toe wordt gedrukt, komt de ingestelde prijs van het product in een TEdit veld te staan en het geselecteerde product in een Listbox. Nu lukt het al om producten in de listbox te selecteren en te verwijderen, maar ik kan de 'totaalprijs' niet meer aanpassen! Code voor toevoegen: [code:1:f011978b1a] procedure TForm1.voegtoeeleknlClick(Sender: TObject); begin Winkelkar.Items.Add(elektro.Text); if elektro.Text = 'Windows Vista Ultimate €160,00' then begin x1 := x1 + 160.00 ; end; s1 := FloatToStr(x1) ; geld.Text := s1 ;[/code:1:f011978b1a] Code voor verwijderen: [code:1:f011978b1a] procedure TTForm1.ButtonDeleteClick(Sender: TObject); begin Winkelkar.DeleteSelected ; end [/code:1:f011978b1a] Geld.text is de TEdit waar het totaalbedrag in moet komen en elektro.text is de combobox. Kan iemand me helpen? Alvast bedankt

Beantwoord deze vraag

Weet jij het antwoord op deze vraag? Registreer of meld je aan met je account

Dit is een gearchiveerde pagina. Antwoorden is niet meer mogelijk.