Не отображаются только некоторые итемы или вообще все? Какой сервер, клиент? В общем лучше писать мне в аську вечером.Kobzar wrote:кстати да - есть такая тема. (я про кнопку)
Но с етим можно жить
много больше напрягает отсутствие команды resend
Никакого криминала тут нет, так что дело не в этом. Могу посмотреть есть ли утечки, если дашь чара со скриптом, пиши в аську вечером, или в PM.drabadan wrote:вот ета штука со стринглистами есть!Code: Select all
function GetFoundItems(var Items: Array Of Cardinal): Integer; var List: TStringList; i: Integer; begin List := TStringList.Create; if GetFindedList(List) = False then Result := 0 else begin SetLength(Items, List.Count); for i := 0 to Length(Items)-1 do Items[i] := StrToInt('$'+List.Strings[i]); Result := Length(Items); end; List.Free; end;