21. oktober 2001 - 21:16
Der er
13 kommentarer og 2 løsninger
ArH!
Jeg har en alm. html-side med nogle frames.. forsiden ser f.eks. er fordelt i nogle tre frames: top.htm main.htm bund.php?ID=763240dsj3273&IDx=2 Nu er det sådan at jeg skal have ID og IDx ind i nogle stringe - jeg har prøvet med pos, men da ID ikke har konstant længde :( Nogen ideer?
Annonceindlæg fra QNAP
21. oktober 2001 - 21:18
#1
du bruger bare pos. pos af id og pos af &idx og så copy\'er du det som er mellem dem... /ZIRON
21. oktober 2001 - 21:24
#2
sådan her: procedure TForm1.Button1Click(Sender: TObject); var ja, resultat : string; pos1, pos2 : Integer; begin ja := \'bund.php?ID=763240dsj3273&IDx=2\'; pos1 := pos(\'ID\', ja); pos2 := pos(\'&IDx\', ja); resultat := copy(ja, pos1 + 3, pos2 - pos1 - 3); ShowMessage(resultat); end; /ZIRON
21. oktober 2001 - 21:25
#3
eksemplet var måske dårligt... desuden var idx noget jeg havde set forkert, sorry Hvis vi ta\'r koden: <En masse html...> <frame name=\"bund\" scrolling=\"auto\" marginwidth=\"0\" marginheight=\"0\" src=\"/bund?id=1003692029.376039023.1.57\"> <En masse html...> der er massar af \"> og id er ikke konstant... hvad gør jeg?
21. oktober 2001 - 21:26
#4
og til den anden: procedure TForm1.Button1Click(Sender: TObject); var ja, resultat : string; pos1 : Integer; begin ja := \'bund.php?ID=763240dfgfdgdgsj3273&IDx=2\'; pos1 := pos(\'IDx\', ja); resultat := copy(ja, pos1 + 4, Length(ja) - pos1); ShowMessage(resultat); end; /ZIRON
21. oktober 2001 - 21:33
#5
Problemet er at jeg ikke har en IDx at gå ud fra længere...
21. oktober 2001 - 22:09
#6
sådan her så: procedure TForm1.Button1Click(Sender: TObject); var ja, resultat : string; pos1, pos2 : Integer; begin ja := \'bund?id=763240dsj3273&IDx=2\'; pos1 := pos(\'id\', ja); pos2 := pos(\'\">\', ja); resultat := copy(ja, pos1 + 3, pos2 - pos1 - 3); ShowMessage(resultat); end; /ZIRON /ZIRON
21. oktober 2001 - 22:14
#7
Ja... men der er en masse \'\">\' før den linie med \'id\' så pos2 vil blive et meget lavere tal end pos1
21. oktober 2001 - 22:17
#8
hmm hvor har du det stående??? /ZIRON
21. oktober 2001 - 22:23
#9
Hvis vi ta\'r hele source: <html> <head> <title>OFiR Chat</title> </head> <frameset framespacing=\"2\" border=\"5\" rows=\"200,*,100\"> <frame name=\"top\" scrolling=\"auto\" marginwidth=\"0\" marginheight=\"0\" src=\"top.htm\"> <frame name=\"main\" scrolling=\"auto\" marginwidth=\"0\" marginheight=\"0\" src=\"main.htm\"> <frame name=\"bund\" scrolling=\"auto\" marginwidth=\"0\" marginheight=\"0\" src=\"/bund.phpid=1003695654.1577079177.0.8\"> <noframes> <body> <p>Denne Web-side bruger rammer, og din browser understøtter ikke rammer.</p> </body> </noframes> </frameset> </html>
21. oktober 2001 - 22:28
#10
det smider du vel ind i en memo eller noget lingende og så sletter du bare alt indtil bund.phpid også bruger du det jeg lavede... /ZIRON
21. oktober 2001 - 22:31
#11
Nu lyder jeg måske dum, men hvordan \"deleter\" jeg i et memo?
21. oktober 2001 - 23:12
#12
Memo1.Lines.Delete(<LineNo>);
23. oktober 2001 - 01:28
#13
benne.dk >> kan du bruge det?? /ZIRON
23. oktober 2001 - 06:54
#14
Tjaaa.. fusker stadig lidt med det... :)
23. oktober 2001 - 07:13
#15
bare iorden :-) /ZIRON
Kurser inden for grundlæggende programmering