10. november 2002 - 16:36
Der er
7 kommentarer og 1 løsning
Slet dele a text
Hej Eks... Ved ik hvordan jeg skal forklare problemet men prøver... Hvis man nu har en "listbox1" og en "edit1" og en button1 på en form. I Edit1 står der FX. "Hej Eksperter" når man så trykker på button1 skal den ik overføre det hele til listbox1, men kun "Eksperten" fra edit1, hvordan gøre man det? Håber i forstår... Vil selv gætte på noget lin. listbox1.items.add(edit1.text - 'hej'); Men det virker ik, man ka ik sige " - " i denne sætning... Hjælp TAK... //Krab
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
10. november 2002 - 16:48
#1
hmm...er det altid det samme antal tegn der skal sorteres fra? procedure TForm1.Button1Click(Sender: TObject); begin listbox1.Items.Add(Copy(edit1.Text,5,length(edit1.Text))); end; Dette sortere i hvert fald 'hej ' fra i ovenståående tilfælde /Sune
10. november 2002 - 16:51
#2
Nej det er ik altid det samme.... Hvordan kan det så gøres? //Krab
10. november 2002 - 16:54
#3
Men der vil altid stå det samme tilsidst i setningen, FX. "Du er" "De er" Der er det altid "er" tilsidst, Hvordan får jeg så "er" til at forsvinde? //Krab
10. november 2002 - 17:11
#4
dvs du altid skal sortere 'er' fra ? Så kan det gøres på denne måde : procedure TForm1.Button1Click(Sender: TObject); var streng : String; posi : Integer; begin posi := Pos('er', edit1.Text)-1; streng := edit1.Text; delete(streng,posi,3); listbox1.Items.Add(streng); end;
10. november 2002 - 19:04
#5
listbox1.items.add(copy(edit1.text, pos(' ', edit1.text)+1, length(edit1.text)))
11. november 2002 - 18:49
#6
>>DKN Hva vil du ik lige forklare lidt om hva det er den gør den kode? //Krab
11. november 2002 - 23:42
#7
jo den kopire fra det første ' ' (space) den findet til slutningen af teksten.
12. november 2002 - 21:56
#8
OKI TAKKER !!!
Kurser inden for grundlæggende programmering