plasticut

Forum Replies Created

Viewing 20 posts - 21 through 40 (of 70 total)
  • Author
    Posts
  • in reply to: подскажите #42156
    plasticut
    Participant

    нужно билдить по порядку ZCore, ZPlain, ZParseSql, ZDbc, ZComponent, ZComponentDesign

    ну и какая ошибка тут function TZPostgreSQL8PlainDriver.DecodeBYTEA(value: string): string; ?

    in reply to: aSkinChanging #42153
    plasticut
    Participant

    Эта переменная – флаг и он показывает происходит ли смена скина.

    in reply to: подскажите #42144
    plasticut
    Participant

    На мой взгляд одни из лучших бесплатных компонент для для доступа к данным http://sourceforge.net/projects/zeoslib/

    Какой класс у поля TDateTimeField, TStringField и тип данных в бд?

    in reply to: подскажите #42139
    plasticut
    Participant

    TsDBDateEdit тут не причем, тк он берет и отдает TField даные не в строке а в TDateTime.
    Тут проблема в компонентах доступа к данным.
    Помнится мне что вроде бы Zeos правильно обрабатывал эту ситуацию а ADO нет.

    in reply to: Удаление страницы в sPageControl #42126
    plasticut
    Participant

    sPageControl.Pages[indexofpage].Free

    in reply to: aSkinChanging #42125
    plasticut
    Participant

    Эта переменная находится в модуле sStyleSimply.

    plasticut
    Participant

    Кстати в D2010 юникод без tntcontrols в free версии.
    Поэтому можно купить D2010 =)
    Хотя проще и дешевле купить исходники AC!

    plasticut
    Participant

    Да, необходимо иметь исходники.

    plasticut
    Participant

    Немного расширю ))

    CODE
    TYourFrame = class(TFrame)
    private
    fButton: TsSpeedButton;
    public
    procedure CreateButtons;
    procedure DestroyButtons;
    end;

    procedure TYourFrame.CreateButtons;
    begin
    sb := TSpeedButton.Create(Self); //параметр – контрол ответственный за удаление кнопки
    sb.Left := 10;
    sb.Top := 10;
    sb.Parent := Self; //отображаем на форме
    end;

    procedure TYourFrame.DestroyButtons;
    begin
    if Assigned(sb) then FreeAndNil(sb);
    end;

    //


    TMainForm.FrameBarItems0CreateFrame(Sender: TObject;
    var Frame: TCustomFrame);
    begin
    Frame := TYourFrame.Create(Self);
    end;

    // Создали кнопки
    if Assigned(FrameBar.Items[0].Frame) then TYourFrame(FrameBar.Items[0].Frame).CreateButtons;
    // Удалили кнопки
    if Assigned(FrameBar.Items[0].Frame) then TYourFrame(FrameBar.Items[0].Frame).DestroyButtons;

    in reply to: Turbo Delphi 2006 #42107
    plasticut
    Participant

    Эта ошибка значит что где то у вас в системе валяется acnt2006_R.bpl, acnt2006_R.dcp от предыдущей версии.
    Поэтому удалите полностью предыдущую версию компонент. И попробуйте скомпилировать заново.

    plasticut
    Participant

    QUOTE (pimshtein @ Mar 31 2010, 05:08 PM) <{POST_SNAPBACK}>
    Добрый день!
    Подскажите, как мне программно нажать на кнопку на sFrameBar?
    На обычных кнопках это можно сделать так:
    //кнопка sSpeedButton
    BarSpeedButton.Perform(WM_LBUTTONDOWN, 0, 0);
    BarSpeedButton.Perform(WM_LBUTTONUP, 0, 0);

    А как здесь программно нажать на sFrameBar1.Items[1] чтобы вызвался метод sFrameBar1Items1CreateFrame(Sender: TObject;
    var Frame: TCustomFrame); и, соответственно, фрейм отобразился бы на форме?

    sFrameBar1.OpenItem(1, True);

    in reply to: Как заскинить Stringgrid #42019
    plasticut
    Participant

    Необходимо добавить в список ThirdParty компонента TsSkinManager запись о TStringGrid она находится в разделе Standart VCL

    plasticut
    Participant

    Позвольте поинтересоваться каким образом может возникнуть av в приведенном вами коде?
    В первом случае где and может выскочить только в случае если у вас включена длинная схема вычисления булевых выражений. Но поумолчанию в дельфе она выключена. Вариант с if then if будет работать всегда.

    plasticut
    Participant

    Ставится, только в дпкашке нужно убрать vcljpg из рекуайресов и изменить acnt2006_R на acnt2010_R. )

    in reply to: Skin Vista (sPanel -> SkinSection "TOOLBAR") #41948
    plasticut
    Participant

    Приблизительное сравнение методов стретча в gdi и gdi+ в аттаче. [attachment=3856:StretchTest.zip]
    В gdi+ возможно есть и более лучший способ чем тот который нашел я. Но тем не менее он показывает немного лучший результат чем StretchBlt с STRETCH_HALFTONE.

    StretchBlt по умолчанию ~43 мс на 100 итерациях.
    StretchBlt+STRETCH_HALFTONE ~210 мс на 100 итерациях.
    GDI+ DrawImageRect ~173 мс на 100 итерациях.

    Кстати попробывал еще и Graphics32. При тех же условиях он показывает 7 мс!

    in reply to: Skin Vista (sPanel -> SkinSection "TOOLBAR") #41947
    plasticut
    Participant

    Попробуйте устанавливить метод стретча контексту девайса таким образом: SetStretchBltMode(DC, STRETCH_HALFTONE).
    Единственный минус что StretchBlt будет работать до 5 раз медленнее.

    plasticut
    Participant

    Полезный компонентик! Респект!

    in reply to: TsTitleItem #41941
    plasticut
    Participant

    FrameUpgrade:=TFrame1.Create(Self);

    in reply to: DevExpress QuantumGrid 6.23 #41817
    plasticut
    Participant

    Патчить файл LookandFeel.pas нужно было в старых версиях альфы. В последних версиях этого делать не нужно.
    Попробуйте убрать в файле acLFPainter директиву {$DEFINE VER645} хотя это врядли поможет лучше обновите девекспресс.
    ps:
    QG 6.46 + AlphaSkins 6.48 на D2007 и D2010 все работает из коробки.

    in reply to: Полупрозрачная png в image #40966
    plasticut
    Participant

    Всем привет!
    вот [attachment=3565:AniShadeForm.zip] развитие старого варианта.
    а у варианта с накладными окнами переспектива получше будет!

Viewing 20 posts - 21 through 40 (of 70 total)