> Supposing you have a stringlist filled this way: > > TagValueList.Values['Date']:=DateToStr(Date); > TagValueList.Values['Time']:=TimeToStr(Time); > > You can convert this list to an array of TVarRec using this code: > > setlength(tags,TagValueList.count*2); > i:=0; > while i<TagValueList.count do > begin > tags[i].VType:=vtPChar; > tags[i].Vpchar:=pointer(strnew(pchar(TagValueList.Names[i]))); > tags[i+1].VType:=vtPChar; > tags[i+1].Vpchar:=pointer(strnew(pchar(TagValueList.ValueFromIndex[i]))); > inc(i,2); > end; > > ClientCnx.AnswerPage(Flags,'','','status.html',nil,tags); > > for i:=low(tags) to high(tags) do > strdispose(tags[i].vpchar);
Way cool, this finally worked. Thank you very much Florian -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
