主页
Top.Mail.Ru Yandeks.Metrika
论坛:“基地”;
当前存档:2002.04.25;
下载:[xml.tar.bz2];

向下

请一个提示 找到类似的分支


Timka   (2002-04-02 08:59) [0]

请告诉我:ТТable由几个组件组成,并且分别由TDBGrid和TControlTab组成,当从书签切换到书签时,执行几乎相同的操作以将数据从表输出到TDBGrid,我通过case语句解决了该问题,但是我有很多表和按钮,对于每个结构基本上重复并且基本上唯一改变的是TDBDrid.DataSource和TTable.IndexNameField。 对于按钮,例如插入记录,删除等。 您还必须使用CASE,至少可以说有十几个表被弄乱了,更不用说使文本混乱,增加了出错的可能性,并使重做变得困难。 现在的问题是:是否有可能以其他方式应用诸如...之类的Sender? (所有都是DataModule中的TTable,许多表是相互连接的...)



deleon   (2002-04-02 09:11) [1]

描述一个类型的数组,该数组将包含指向按钮事件的指针,DataSet和其他信息,然后执行LoadPage()类型的过程;在其中描述从相应数组元素(对应于选项卡)读取数据并将此数据分配给必要的是,IndexName,DataSet ...通过正确的数组组织和加载过程,一切都会正常运行...这是执行此操作的选项之一:)))



Johnmen   (2002-04-02 09:31) [2]

或编写必要的程序和函数,其参数将指向必要对象的指针...



Timka   (2002-04-02 12:50) [3]

嗯……我当然会道歉,但是我并没有真正想象到指向对象的指针看起来有多准确,甚至更没有想到这些对象的事件。 你能带一个premerchik吗? 并告诉我,在哪里可以看到更多详细信息? Pliiiz ...



deleon   (2002-04-02 12:59) [4]

类型
Ipage =记录
数据源:TDataSource;
AddProc:TNotifyEvent;
EditProc:TNotifyEvent;
DelProc:TNotifyEvent;
结束;

函数DataSource1:TDataSource;
函数DataSource2:TDataSource;
函数DataSource3:TDataSource;

常量
IPage的IPageArray [0..2] =
(((DataSource:DataSource1; AddProc:Button1Click; EditProc:
Button2Click; DelProc:Button3Click),
......................

履行

函数DataSource1:TDataSource;
开始
结果:= MainForm.SuperDataSource1;
结束;

一切都差不多了...维尼,已经很累了:)))



Aleksandr   (2002-04-02 13:06) [5]

好吧,通过Tag属性使用所有内容难道不是很容易吗? 方法中的Sender参数可以隐式访问...尽管,也许我误解了一些东西,但是在一个程序中,我有类似的机制,包括一堆表和TabControl ...没错,我没有在那里产生一堆组件,并根据书签填充的TQuery ...



VAleksey   (2002-04-02 15:50) [6]

哈,我认为您可以更加轻松:
在窗体的“青年”中的“公共”部分中写道:MyTable:TTable;
浏览TabSheet时,请执行以下操作
MyTable:= Table1;
并要求MyTable您想要什么方法和动作!
在这种情况下,所有内容都将应用于表1!



Timka   (2002-04-03 19:26) [7]

去德莱昂:
非常感谢例子! 我觉得这种方法对我非常有用... :)))

到VAleksey:
酷 F :(我坐在镜子旁边,摸着耳朵...我估计了长度...

感谢许多帮助!

顺便说一下,师父的同志们,为了进一步提高教育水平,您能告诉我吗:)为什么会发生以下情况:

使用BathMove记录从dbf转移到paradox,通过帮助类型delphi按文本字段对tabla进行排序。
适用于95百分比的情况。 只。 症状:
有一个记录SALT - 仅在第一个字母是拉丁文时排序
CUCUMBERS记录 - 根本没有排序,(前方没有空间)
如果我通过DBGrid改变 - 一切都很好。 直到我关闭德尔福。 随着一个开放的开放,一切都回来了。 在一个会话中一切都很好,不同的项目看到了变化。 通过SQL资源管理器 - 表中的更改是永久性的。
桌子很小很好,我不小心注意到了。 如果不是100和1000记录? 怎么处理呢?
或者在另一个帖子中问这个问题更好吗?



VAleksey   (2002-04-04 06:38) [8]

是的在另一个



Timka   (2002-04-04 11:51) [9]

得到它谢谢



Страницы: 1 整个分支

论坛:“基地”;
当前存档:2002.04.25;
下载:[xml.tar.bz2];

楼上





内存:0.58 MB
时间:0.021 c
1-80984
Sat7
2002-04-12 11:59
2002.04.25
有一棵树。 但不是二元的。 :)


3-80802
Glonia zbanov
2002-04-05 10:58
2002.04.25
人! 解释查询设计。


3-80771
Леонид
2002-04-04 10:08
2002.04.25
TDBGrid字段视图按钮


14-81042
vopros
2002-03-19 16:43
2002.04.25
我建议将邪恶的非人类排除在这里之外。


14-81054
他的
2002-03-07 15:33
2002.04.25
--- |分支无标题| ---





南非荷兰语 阿尔巴尼亚人 阿拉伯语 亚美尼亚 阿塞拜疆 巴斯克 白俄罗斯 保加利亚语 加泰罗尼亚 简体中文 中国(繁体) 克罗地亚 捷克 丹麦语 荷兰人 英语 爱沙尼亚语 菲律宾人 芬兰 法语
加利亚西语 格鲁吉亚语 德语 希腊语 海地克里奥尔语 希伯来语 印地语 匈牙利 北日耳曼语 印度尼西亚人 爱尔兰语 意大利语 日本 韩语 拉脱维亚 立陶宛 马其顿 马来语 马耳他语 挪威语
波斯语 波兰语 葡萄牙语 罗马尼亚 俄语 塞尔维亚 斯洛伐克 斯洛文尼亚 西班牙语 斯瓦希里 瑞典语 泰国人 土耳其 乌克兰 乌尔都语 越南人 威尔士语 意第绪语 孟加拉 波斯尼亚
宿务 世界语 古吉拉特语 豪萨语 苗族 伊博 爪哇 卡纳达语 高棉 老挝 拉丁语 毛利 马拉 蒙古人 尼泊尔 旁遮普 索马里 淡米尔文 泰卢固语 约鲁巴语
祖鲁
英文 Французский Немецкий Итальянский Португальский 俄文 Испанский