小编Him*_*dri的帖子

如何在Datagridview中的Button列中处理click事件?

我正在使用C#开发一个Windows应用程序.我DataGridView用来显示数据.我在其中添加了一个按钮列.我想知道如何在DataGridView中处理该按钮上的click事件.

.net c# datagridview winforms

126
推荐指数
6
解决办法
26万
查看次数

Delphi - 如何获取目录的所有文件的列表

我正在使用delphi,当我执行openpicturedialog时,我想要一个目录的所有文件的列表.

即,当执行打开对话框并从中选择一个文件时,我想要所选文件目录中的所有文件列表.

您甚至可以建议我从 Thank You的FileName属性获取目录名称TOpenDialog
.

delphi opendialog

19
推荐指数
2
解决办法
6万
查看次数

Delphi:如何使用TShiftState类型变量?

我正在开发一个Delphi应用程序.
在TImage.MouseDown事件中X,Y如果按下shift键,我想要执行任务,如果按下控制键则Z执行任务,如果没有按下任务,则执行任务.为此,我使用TShiftState变量.现在我有一个函数,我必须将此变量作为参数传递.

procedure Something(keyState : TShiftState);
Run Code Online (Sandbox Code Playgroud)

现在在这个函数中我应该检查密钥的状态吗?

if KeyState <> ssShift then begin

end;
Run Code Online (Sandbox Code Playgroud)

上面的代码显示错误.
谢谢.

delphi keypress

9
推荐指数
2
解决办法
3万
查看次数

我可以在不丢失以前内容的情况下调整Delphi数组的大小吗?

我有一个动态数组.但最初我不知道阵列的长度.我可以先做,我将它的长度设置为1,然后根据需要增加长度而不丢失以前存储的数据吗?
我知道我可以使用TList做这样的任务.但我想知道我是否可以用数组做到这一点?

delphi dynamic-arrays

8
推荐指数
1
解决办法
6890
查看次数

开始结束是否会影响条件语句的性能?

我正在使用Delphi.如果我们if condition以不同的方式写作,它会对性能产生任何影响吗?例如:

if (condition) then
   someVar := someVal
else
   someVar := someOtherVal;  
Run Code Online (Sandbox Code Playgroud)

或者我们可以写:

if (condition) then begin
   someVar := someVal;
end else begin
   someVar := someOtherVal;
end;  
Run Code Online (Sandbox Code Playgroud)

我更喜欢第二种选择,因为它看起来比第一种更好.

delphi syntax performance if-statement

6
推荐指数
1
解决办法
1132
查看次数

补码的劣势?

我正在阅读有关二进制补码的内容,我知道这种方法最有效,但也可能存在一些缺点。我找不到任何缺点,是否存在转换为二进制补码无法正确表示数字的情况?

twos-complement

5
推荐指数
1
解决办法
4395
查看次数

如何将记录与TListBox项关联?

我有一种记录类型.我想在TListbox中添加该记录类型的变量,并在TListbox的click事件中检索它.可能吗?如果是,那怎么样?

我用它添加了它

lstbox.AddItem(data,myrec);
Run Code Online (Sandbox Code Playgroud)

它显示不兼容类型的错误.data是字符串,myrec是我创建的MyRecord的变量.

添加:

New(fptr1);
ZeroMemory(fptr1,sizeof(fptr1^));
fptr1^ := fptr^;
lstboxLeft.AddItem(path,TObject(fptr1));
Run Code Online (Sandbox Code Playgroud)

用于检索:

fptr := PData(lstboxLeft.Items[lstboxLeft.ItemIndex]);
Run Code Online (Sandbox Code Playgroud)

delphi listbox

4
推荐指数
1
解决办法
6537
查看次数

如何更改TCanvas的textOut的高度?

我正在使用TextOut()在TCanvas上绘制文本,但我想要更大的字体.

我能做什么?

delphi textout

4
推荐指数
1
解决办法
1674
查看次数

使用anytree和graphviz在python中渲染树,而不合并公共节点

我正在["abc", "abd", "aec", "add", "adcf"]使用任何python3包创建一个列表中的树.在这个树中,每个列表元素的第一个字符 - a是一个根,随后,其他字符被添加为它们的子元素.当我渲染树时,它看起来像:

to_picture

但是当我使用["abc", "abd", "aec", "add", "adcf"]方法将树渲染到图片时,图像是 -

在此输入图像描述

我不希望合并公共节点,因为它向我的树添加了不需要的路径.

提前致谢.

graphviz python-3.x anytree

4
推荐指数
1
解决办法
2736
查看次数

使用delphi缩放图像

我正在使用delphi.我有TImage,我为其分配了一个位图.

imgmain.Picture.Bitmap := bmpMain;
imgmain.Picture.Bitmap.PixelFormat := pf24bit;
Run Code Online (Sandbox Code Playgroud)

imgmain是TImage的对象,bmpMain是TBitmap的对象

我想缩放我的图像.我的表单上有一个轨迹栏,当我点击轨迹栏时,图像应该变焦.我该怎么办?
谢谢.

编辑:
我在这里找到了一些解决方案它有效,但它削减了我的形象.

delphi timage

3
推荐指数
1
解决办法
1万
查看次数