Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations biv343 on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. monxxx

    Parse String

    the file i was trying to load is like this: [Providers] 00101000=ALL Operator|- 20201000=Cosmote|Greece 20205000=Vodafone / Panafon|Greece 20209000=Q-Telecom|Greece 20210000=Telestet / TIM|Greece 20404000=Vodafone / Libertel|Netherlands 20408000=KPN Telecom|Netherlands 20412000=Telfort /...
  2. monxxx

    Parse String

    function Parsing(Char, Str: string; Count: Integer): string; var i : Integer; strResult : string; begin if Str[Length(Str)] <> Char then Str := Str + Char; for i := 1 to Count do begin strResult := Copy(Str, 0, Pos(Char, Str) - 1); Str := Copy(Str...
  3. monxxx

    Parse String

    this is what i did: var myFile : TextFile; text : string; begin AssignFile(myFile, ExtractFilePath(Application.ExeName) + 'Providers.ini'); Reset(myFile); while not Eof(myFile) do begin ReadLn(myFile, text); ComboBox1.AddItem(Parsing('|', text, 2)...
  4. monxxx

    Parse String

    Hi, anybody can help me with my problem? :) i am trying to parse a string and i want this to put into a ComboBox. the string format that i want to parse is like this: [TEST] 12345678=abcdef / fhdfkjd|Sample 45464454=fffdfdsfs|Sample 44343232=jrhewrj / dsadasd|Sample 43452355=fdsfsd|Example...

Part and Inventory Search

Back
Top