rareMax

Пользователи
  • Публикаций

    534
  • Зарегистрирован

  • Посещение

  • Победитель дней

    31

rareMax стал победителем дня 5 июня

rareMax имел наиболее популярный контент!

4 Подписчика

Информация о rareMax

  • Звание
    Продвинутый пользователь
  • День рождения 03.01.1995

Контакты

  • ICQ
    611110205
  • StackOverflow
    http://ru.stackoverflow.com/users/12119/ms301

Информация

  • Пол
    Мужчина
  • Город
    Мелитополь

Посетители профиля

3 961 просмотр профиля
  1. rareMax

    NetHttpClient vs idHttp

    Как насчёт хейдеров?
  2. {$ZEROBASEDSTRING ON} и работай с учётом что строка с 0 начинается. Либо юзай хелперы
  3. думаю он их вручную отрисовует, не в мемо.
  4. Тык тык https://github.com/zhaoyipeng/FMXComponents/blob/master/ComponentsSource/FMX.Graphics.NativeCanvas.pas
  5. cuHttpClientSysNet1.Proxy:=TcuProxy.Create(EditHost.Text, EditPort.Value, EditUserName.Text, EditPassword.Text); попробуй так
  6. rareMax

    Доступ к классу ApplicationData

    C:\Windows\System32\windows.storage.dll
  7. rareMax

    Доступ к классу ApplicationData

    Думаю стоит глянуть на длл"ки, идущие в .net framwork
  8. rareMax

    почему компилятор ругаетс

    У класса нет метода Terminated (какой вопрос - такой ответ)
  9. Вынеси эту переменную в отдельный модуль 'MyVariableUnit.pas' и добавь его во все места, где нужно обращаться к переменной
  10. rareMax

    Убрать поле при сериализации

    Ну на самом деле FFoo в приватной секции мне нужна. Отлично, то что нужно
  11. rareMax

    Убрать поле при сериализации

    Как убрать поле класса из сериализации через Rest.Json? Вот как я пробую избавиться от поля Foo: program Project1; {$APPTYPE CONSOLE} {$R *.res} uses REST.Json, System.JSON.Serializers, System.SysUtils; type TFoo = class private FValue1: Integer; public Value2: Integer; property Value3: Integer read FValue1 write FValue1; end; [JsonSerialize(TJsonMemberSerialization.&Public)] TBar = class private FValue1: Integer; FFoo: TFoo; public Value2: Integer; property Value3: Integer read FValue1 write FValue1; // property Foo: TFoo read FFoo write FFoo; end; procedure Test; var LBar: TBar; begin LBar := TBar.Create; try Writeln(TJson.ObjectToJsonString(LBar)); finally LBar.Free; end; end; begin try { TODO -oUser -cConsole Main : Insert code here } Test; Readln; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; end. Но на выходе все равно есть поле Foo.
  12. rareMax

    THTTPClient асинхронность

    Не обязательно выносить в отдельный тред этот класс. Достаточно воспользоваться асинхронными методами. Ознакомиться с ним возможно в демке от Идеры:
  13. rareMax

    Разница в потоках?

    В первом варианте можно немного управлять выполнением кода.