Конференция "KOL" » Версия 3.04 [Delphi]
 
  • Vladimir Kladov © (22.01.11 12:14) [20]
    Будет и табличный вид (немного не так в listview - в 2 строки), но позже. В первую очередь делаю то, что мне нужнее. Всю жизнь еще с 95 виндов всегда вынужден был переключать в режим Список. Достало уже, особенно доставать стало в семерке, где просто не запоминает вид для всех папок. Как только Проводник видит avi-файл или картинку, автоматом переключает в режим эскизов.

    Двухпанельность - мне не нужна. Есть Ctrl+Tab или системное меню New window, или открытие директории с шифтом в новом окне. Сколько надо, столько и будет окон. Двухпанельные менеджеры мне неудобны, заслоняют весь экран.

    Глюки возможны, С языками я немного ошибся в нумерации, лучше пока языковые файлы грохнуть. Все равно локализация еще только начата. Надписи нечитабельны - на каких кнопках - слева, что ли? Там не надо читать ничего, это так, декорация. Или на обычных кнопках?

    Хотя глюк с пропаданием диска - это вообще из фантастики. Как этого можно добиться - не представляю. Диск д - это что? СД? Жесткий? Флэшка? Я надеюсь, вы его не переименовали... А то я забыл на верхнем уровне убрать 1-секундное меню по долгому удержанию левой клавиши мыши :)
  • Dufa © (22.01.11 14:55) [21]
    Д это жесткий. Вот картинка http://s2.ipicture.ru/Gallery/Viewfull/3214354.html
  • Vladimir Kladov © (22.01.11 16:51) [22]
    Dufa Можно вопрос: вы картинку сразу сделали, или так несложно добиться этого эффекта повторно? (Если не секрет, то как).

    Со шрифтами правда странно, что они не вытянуты в ширину. У вас Arial неправильный в системе? (Или это вообще не Windows, а что-то иное?)
  • Dufa © (22.01.11 18:43) [23]
    Запускаю прогу с диска Д, выхожу в самый корень кнопкой вверх. Сначала все норм, потом начинается пересчет свободного\занятого места и происходит глюк

    Ариал самый обычный, тема не стандартная
  • Vladimir Kladov © (22.01.11 20:07) [24]
    Но на уровне Компьютер нет перерасчета, данные по диску берутся из GetDiskFreeSpace. Перерасчет - это когда в скобках мелькает (..:) -> (:..) -> (.:.), это для директорий.

    Должно быть примерно так (со шрифтами): http://s1.ipicture.ru/uploads/20110122/R3VTLTvK.png

    А вот, например, если в KOL-программе шрифту поменять FontWidth, у вас никакой реакции не наблюдается на компе? Со всеми шрифтами? На true type и вообще на масштабируемые должно бы действовать.

    Кстати, перезалил и архив с программой. Локализацию почти закончил, хотя еще не все на русский перевёл.
  • QAZ (26.01.11 11:08) [25]

    > Достало уже, особенно доставать стало в семерке, где просто
    > не запоминает вид для всех папок. Как только Проводник видит
    > avi-файл или картинку, автоматом переключает в режим эскизов.

    меня всегда умиляли програмисты которые сами не могут пользоваца тем,для чего они программируют :D
    а пытаюца заполнить пробелы в своих знаниях непонятными глюкавыми поделками

    чтобы проводник этого не делал надо потратить всего две минуты на настройку
    и при этом даже не используеца редактор реестра!!! :)
  • Santa (27.01.11 10:45) [26]
    Не знаю глюк или не глюк, но столкнулся в компоненте TabControl.
    Не прорисовываются компоненты на активной закладке.
    Ложим в MCK\KOL-проект на форму TabControl (Align=caClient) и добавим одну закладку (Count=1, Caption='Тестовое');
    Положим для примера кнопку (TKOLButton), по нажатии на которую будут добавляться закладки

    Напишем, допустим,следующий код в OnClick кнопки:

    procedure TForm1.Button1Click(Sender: PObj);
    var
     i,n:Cardinal;
     Page:TKOLTabPage;
     Panel:TKOLPanel;
     Edit:TKOLEditBox;
     ListView:TKOLListView;
    begin
     n:=TabControl.Count;
    {  Page:=TabControl.Pages[0];}
     Page:=TabControl.TC_Insert(n,'Тестовое2',0);
     TabControl.CurIndex:=n;                              {*}
     Panel:=NewPanel(Page,esNone);
     Panel.Align:=caTop;
     Panel.Height:=40;
     Edit:=NewEditBox(Panel,[]);
     ListView:=NewListView(Page,lvsDetail,[],nil,nil,nil);
     ListView.Visible:=true;
     ListView.Align:=caClient;
    end;

    Созданные компоненты не прорисовываются на закладке, зато достаточно малейшего изменения размера формы(свернуть, максимизировать, растянуть и т. д.) как они появляются так как им и надо быть.

    P. S. Если перенести строку {*} в конец процедуры - то все отображается нормально. Но аналогичная проблема свуществует, если закладку не добавлять, а рисовать на активной.
  • Santa (27.01.11 10:46) [27]
    Забыл добавить, версия 3.06
  • QAZ (27.01.11 10:48) [28]
    Удалено модератором
  • Santa (27.01.11 11:20) [29]
    Еще обнаружен глюк при использовании компонента MainMenu в версии 3.06 (в остальных не проверю).
    Если создать меню проекте KOL\MCK, затем распахнуть окно на весь экран, затем минимизировать на панель задач, затем востановить с панели задач, то востановление происходит в обыную форму, а не распахнутую на весь экран. При использовании других компонентов данный глюк не обнаружен.
  • Vladimir Kladov © (27.01.11 16:37) [30]
    По первому вопросу. Созданному контролу надо сказать CreateWindow или GetWindowHandle. Само не создастся, если не вызывался код, приводящий к созданию окна (например Perform). Это было и в ранешних версиях, всегда.

    Про MainMenu и восстановление не в максимум проверьте еще раз. Пока эффект не замечен, на тестовом проекте. Посмотрел под Win 7, в asm и в pas-версиях, восстанавливается в максимум.
  • Santa (27.01.11 16:57) [31]
    По второму вопросу - Delphi 7, Винда XP SP3, глюк воспроизвелся на аналогичной машине, на других системах воспроизвести глюк в ближайшем будущем нету возможности ...
  • Santa (27.01.11 17:05) [32]
    Забыл уточнить еще одну деталь, данный глюк с MainMenu случается при наличии на форме компонента KOLApplet, без него вроде как все в порядке
  • Vladimir Kladov © (28.01.11 03:32) [33]
    Ну так MainMenu вообще ни при чем, что оно есть, что его нет, поведение одинаково.

    Установите форме MinimizeNormalAnimated = true.
  • Jon © (30.01.11 03:50) [34]

    > Да, если кому не лень потестировать, выложил маленький файловый
    > командер: http://kolmck.net/apps/ColumnCmdr.zip


    I just tried v1.0f and it is a very nice start. Keep us updated on the progress.
  • BMouradov (30.01.11 21:15) [35]
    Сейчас скачал 3.06+, создал NewStrList и сделал .Sort(False), программа выдала ошибку: в ассемблерной функции Sort программа натыкалась на fList.Count, а fList при этом = nil. Я не разобрался до конца с ассемблером, похоже, там сравнение if Count > 1 то ли отсутствует, то ли обрезано, в общем, не работает.

    program Project1;

    uses
     KOL;

    var sl: PStrList;

    begin
     sl := NewStrList;
    //  sl.Add('1');
     sl.Sort(False);
     ShowMessage('1');
    end.
  • BMouradov (03.02.11 01:07) [36]
    В 3,07 то же самое.
  • Vladimir Kladov © (03.02.11 16:18) [37]
    SPEED_NORMAL добавьте в опции.
  • Santa (04.02.11 10:52) [38]
    Не совсем понятно следующее:
    В MainMenu есть набор примерно одинаковых по обработке пунктов меню с небольшими отличиями(Например структура файлов одинакова и значит обрабатывать их можно одинаково - различие допустим в названии файла). Что бы не заморачиваться с обработкой, выставляю свойство Tag у пуктов меню и отправляю на один и тот же обработчик. Что то вроде:


    procedure TForm1.MainMenuN200Menu(Sender: PMenu; Item: Integer);
    var
     c:Cardinal;
     st:TKOLString;
    begin
     c:=Sender.Tag;
     st:=Sender.Caption;
     ShowMessage(Int2Str(c)+' '+st);
    end;



    Так вот, с Caption все нормально получается, а вот Tag всегда равен нулю.
  • Santa (04.02.11 10:54) [39]
    Данное наблюдается в Delphi7, WinXP как в ассемблерной так и паскалевской версии.
 
Конференция "KOL" » Версия 3.04 [Delphi]
Есть новые Нет новых   [120347   +17][b:0][p:0.001]