Avatar billede jhald Nybegynder
11. september 2001 - 00:04 Der er 2 kommentarer og
2 løsninger

Simpel tekst-string

Jeg har en string TestString hvori der står \'101 Bossen dum\' ... hvor det første ord altid er en 3 cifret kode, det andet er altid hvem det omhandler, og det sidste er noed om personen... (og ja, ved godt det er barnligt eksempel :)

Anyway, hvordan hiver jeg ord nummer 2 ud i en string for sig selv... helst uden at skulle ind med for-løkke og finde ud af hvor der er mellemrum..

Er der ikke en funktion der gør at man beder den om at returnere et bestemt nr. \"ord\" i en tekststring?
Avatar billede jasber Nybegynder
11. september 2001 - 00:53 #1
Prøv lige at se om der ikke findes en kommando der hedder substr() - Der er der i Pascal, så mon ikke den også findes i Delphi (er sgu næsten det samme)
Avatar billede roenving Novice
11. september 2001 - 00:55 #2
>>jasber

Ikke *næsten* -- det ER simpelthen pascal, som er programmeringssproget, men Delphi er født med en selvstændig objekt-model, som du kan bruge kommandoerne på.

mvh
jes
Avatar billede ziron Nybegynder
11. september 2001 - 01:33 #3
jeg menere ikke du kan gøre det uden at skulle søge og til det kan du prøve denne function:

function hentord(ord : String): String;
var
  t1 : Integer;
begin
  t1 := POS(\' \', ord);
  delete(ord, 1, t1);
  t1 := Pos(\' \', ord);
  Result := copy(ord, 1, t1);
end;

og hujsk lige at lægge dette med oppe i din var, der hvor der står Form1: TForm1;

function hentord(ord : String): String;

/ZIRON
Avatar billede hreiff Nybegynder
26. oktober 2001 - 15:44 #4
Jeg kender ikke nogen direkte funktion, men man kan udnytte den faste placering af ordet (tegn nr. 5 og frem (det starter altid med nnn_xxxxxxx_yyyy))

function HentOrd(strn:string):string;
var
  temp: string;
begin
  temp:= copy(strn,5,255);        {kopierer fra pos. 5 til slut}
  delete(temp,pos(\' \',temp),255); {sletter fra mellemrum til slut}
  result := temp;
end;

HentOrd(\'101 bossen dum\');
  resulterer i \'bossen\'

//hreiff
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester