krapotkin

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

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

  • Посещение

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

    72

krapotkin стал победителем дня 25 октября

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

5 Подписчиков

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

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

Контакты

  • ICQ
    125417612

Информация

  • Пол
    Мужчина
  • Город
    Екатеринбург

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

1 645 просмотров профиля
  1. krapotkin

    Непонятный LiveBinding Object

    самое правильное по всем статьям просто руками написать загрузку данных в UI, реакцию на изменения в UI и выгрузку данных в МД времени занимает в 100 раз меньше, чем ловить глюки и отлаживать "технологии"
  2. значит, вычищайте все из USES всего проекта, что начинается на VCL.
  3. ну наверное не стоит ожидать чтобы два разных фреймворка в одной программе хорошо сосуществовали проверил. чудесно работает, нативно выглядит FMX.Dialogs.SelectDirectory('Открыть папку','C:\',st);
  4. вот код главной формы unit UMain; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Controls.Presentation, FMX.StdCtrls, FMX.Edit, FMX.ListView.Types, FMX.ListView.Appearances, FMX.ListView.Adapters.Base, FMX.ListView, FMX.ScrollBox, FMX.Memo, FMX.ListBox, FMX.Layouts, FMX.ExtCtrls, FMX.Objects, FMX.EditBox, FMX.SpinBox; type TfMain = class(TForm) b1: TButton; procedure bExitClick(Sender: TObject); procedure b1Click(Sender: TObject); private public end; var fMain: TfMain; implementation uses unit3; {$R *.fmx} procedure TfMain.b1Click(Sender: TObject); begin rundialog(Self); end; procedure TfMain.bExitClick(Sender: TObject); begin close; end; end. вот код unit3 unit Unit3; interface uses System.Classes, FMX.Dialogs; procedure RunDialog(AOwner:TComponent); implementation procedure RunDialog(AOwner:TComponent); var OpenDlg:TOpenDialog; begin OpenDlg := TOpenDialog.Create(AOwner); try OpenDlg.Execute; finally OpenDlg.Free; end; end; end. и ничего. все работает штатно. форма не прячется ЧЯДНТ?
  5. Все отписываться и говорят что не воспроизводится. Значит что то упускаем, значит что то нестандартно
  6. Это уже звучало на другом форуме, но что-то автор темнит Я воспроизвел главную форму, модуль данных, из модуля данных(!) открываю OpenDialog И все равно не проявляется эффект
  7. krapotkin

    TPaintox+Tbitmap

    если все шустро, то и норм ))
  8. krapotkin

    Произвольные компоненты в TListView

    нет. если мало итемов, используйте ListBox если много, нужно пересмотреть дизайн приложения Не может быть Edit на ListView не только потому что невозможно, но и потому что не должно так быть
  9. off: но это конечно фу )) то что вы из базы просто что-то куда-то пишете и не заботитесь о том, как будете потом это искать. Использование невизуального свойства Data у ListViewItem имхо гораздо предпочтительнее
  10. нужно не хранить данные на экране, а доставать их из структуры данных, по которой вы создаете этот ListView
  11. по мне, так лучше сделать собственного наследника TDrawable по примеру того как сделана сама эта кнопка. я делал такое, когда мне надо было иконки, уголки и другие нестандартные элементы
  12. ну а координаты родителя-то кто меняет, сам?? значит есть и возможность все остальное приводить
  13. формально подходите к вопросу кто создал компонент, тот и должен им распоряжаться хранить ссылку на него, в зависимости от каких-то событий менять им position, color и все что угодно если нужно создайте класс, который будет это делать. можно в качестве этого класса, если он "одноразовый", использовать сам класс формы
  14. krapotkin

    Ошибка QuotedStr

    для начала вообще просто строку написать хардкодом, без переменных 'CHILDFAM=''значение'' ' потом еще 2 раза проверить тип поля