捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  沪ICP备05001939号 DELPHI盒子 | 盒子论坛 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 论坛检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
 
广告
评论:FlatStyle v4.42.9.0 For D7
wangbinbaby 37505 2009/5/18 18:07:53
[Fatal Error] BackUp_Form.pas(7): File not found: 'TFlatGaugeUnit.dcu'
 
请问各位大侠,这个怎么解决呢?
zybzhen 35860 2008/10/22 16:11:13
TFlatListBox 在第二次 获得 焦点的时候 flatlistbox1.itemIndex :=0 或者flatlistbox1.selected[0]; 或 selected[0] := true; 都不好使
是不是我用得不对?应该怎么样用?
cimssoft 34593 2008/6/12 21:28:38
在FlatTabs基础上能否增加一个FlatPageControl
flymars 34355 2008/5/30 18:50:40
flatstringGrid用不了,设置其cell[]的时候老是出现问题;,
function  TFlatSparseArray.GetAt(Index: Integer): Pointer;
var
  byteP: PChar;
  secIndex: Cardinal;
begin
  { Index into Section Directory using high order part of
    index.  Get pointer to Section. If not null, index into
    Section using low order part of index. }
  if Index = cachedIndex then
    Result := cachedPointer请答复下
mslxq 33595 2008/4/7 22:33:11
flatstringGrid用不了,设置其cell[]的时候老是出现问题;
nsl204 31495 2007/10/20 21:26:43
这个版本内的flatcombobox输入的内容与flatcombobx.item匹配的时候容易出现乱码,不知道为什么?如果是数据的话就不会出现,如果是汉字的话很容易出现乱码,是不是汉化不好呢?
imlujian 31077 2007/9/3 22:42:32
listbox 怎么才能禁止它获得焦点呢,我记得以前的版本可以啊???
dalas 31046 2007/9/1 3:10:38
补充 fhx123:
增加滚轮消息还不够,还要增加光标键消息:

  WM_KEYDOWN:
    Case Message.WParam of
    VK_Left,VK_Right,VK_UP,VK_Down : InvalidateRect(Handle, nil, False);
    end;
imlujian 31035 2007/8/31 12:53:13
listbox行高怎么不能调了啊? 
还有DefineWate这些是有什么作用呢,有没有个简单的功能说明啊?

总的来说不错!!!
fhx123 31029 2007/8/30 14:33:04
所有 Ticket 属性都有一个共同的 BUG,把 Ticket.Caption 设置为空字符,保存,关闭工程,再次打开,Ticket.Caption 会自动重置为该控件的 Name。

我的临时解决办法(以 TFlatLBPanel 为例):

constructor TFlatTicket.Create(AOwner: TComponent);
begin
  ......
  if Assigned(AOwner) then Caption := ''; //AOwner.Name;

procedure TFlatLBPanel.SetName(const Value: TComponentName);
begin
{
  if Assigned(FTicket) then
  begin
   if (csDesigning in ComponentState) and ((FTicket.GetTextLen = 0) or 
     (CompareText(FTicket.Caption, Name) = 0)) then
    FTicket.Caption := Value;
  end;
}

这样改后的后遗症就是新创建的 FlatLBPanel1.Ticket.Caption 为空。
不过我个人认为默认为空还好些,因为这个属性不是很常用,创建之后还要把它赋为'',即使要用,也肯定不可能使用默认的控件名字,而是另外的字符串。
fhx123 31025 2007/8/30 1:18:19
SUIPack 6.2 源码:
http://www.ccrun.com/down.asp?i=129&d=a134fd
fhx123 31024 2007/8/30 1:13:58
给 comerose 提两个建议:
给 TFlatListView 和 TFlatTreeView 增加个 Transparent 如何?就象 TFlatListBox 那样。说实在的,Transparent 远比 GroundPic 实用、方便。
另外,如果有空,能否增加个类似 TFlatComboBox 的 Panel 控个?就是能下拉、能收缩的 Panel。
可以参考东日 SUIPack 中的控件 TsuiPanel,老妖的网站上有它的 6.2 源码。
fhx123 31023 2007/8/30 0:55:01
TFlatListView背景图有个BUG,画上背景图后,如果使用滚动条一切正常,但如果使用鼠标滚轮,背景图就会混乱了。
解决办法也很简单:
procedure TDefineListView.WndProc(var Message: TMessage);
找到:WM_HSCROLL,,加一个 WM_MOUSEWHEEL, 滚轮消息就可解决了。

    WM_MOUSEWHEEL, //滚轮消息
    WM_HSCROLL,
    WM_VSCROLL: if (GroundHas) then InvalidateRect(Handle, nil, False);
comerose 30977 2007/8/24 21:10:33
rainstorey 2007-8-17 14:21:35 
FlatStyle是界面效果包,不知道增加TFlatSingle有何意义? 

呵呵!这是写一个只运行一个程序的软件时做的,觉得得方便,我便集合进来了!


mengyong201 

多谢楼上的测试!
mengyong201 30934 2007/8/21 13:55:11
应该在 TDefineWater = class(TDefineTimer) 的 public 增加一个方法:
procedure Notification(AComponent: TComponent;Operation: TOperation); override;
__________
procedure TDefineWater.Notification(AComponent: TComponent; Operation: TOperation);
begin
  inherited;
  if (Operation = opRemove) and (AComponent <> nil) then
  begin
    if AComponent=FImage then CtrlImage:=nil;
  end;
end;
这样在设计期删除与 TFlatWater 关联的 TFlatImage 时就不会出错了。
rainstorey 30902 2007/8/17 14:21:35
FlatStyle是界面效果包,不知道增加TFlatSingle有何意义?
nevergrief 30897 2007/8/17 10:02:34
强人啊!有没有在国外卖到钱啊?
jianlei 30896 2007/8/17 8:32:31
感谢更新!
在D2007中编译的开关可能要修正一下:
{ Delphi 2007 and C++ Builder 2007 }
{$IFDEF VER190}  改为 {$IFDEF VER185}
comerose 30893 2007/8/16 23:59:51
增加了D8,D2005,D2006,D2007的编译开关!
希望大家测试一下,是否能够编译通过!在这里报告一下!
register 30890 2007/8/16 21:50:55
能上个 Demo 图吗?

产品好,也要广告做得好呀!
第一页 上一页 下一页 最后页 有 20 条纪录 共1页 1 - 20
 用户名:
 密 码:
自动登陆(30天有效)
 
  DELPHI盒子版权所有 1999-2023 V4.01 粤ICP备10103342号-1 更新RSS列表