选择否 单号
1
Y 2
Y 3
4
Y 5
6 注：选Y的项不一定是连续行
我的“选择否”栏位是双击来打Y的，现在我如何判断是 “Y” 的第一行索引号及最后一行索引行号并分别用变量记录下来？
谢谢各位大虾了
-
等级
本版专家分：58结帖率 100% -
我的stringgrid内容假设如下
选择否 单号
1
Y 2
Y 3
4
Y 5
6 注：选Y的项不一定是连续行
我的“选择否”栏位是双击来打Y的，现在我如何判断是 “Y” 的第一行索引号及最后一行索引行号并分别用变量记录下来？
谢谢各位大虾了展开阅读全文
-
等级
本版专家分：28920勋章
-
-
红花
2005年4月 Delphi大版内专家分月排行榜第一
2005年3月 Delphi大版内专家分月排行榜第一
-
-
黄花
2008年5月 Delphi大版内专家分月排行榜第二
2006年2月 Delphi大版内专家分月排行榜第二
-
-
不明白。
用个循环判断不就行了吗？
-
等级
本版专家分：5926勋章
-
- 签到王者 累计签到获取，不积跬步，无以至千里，继续坚持！
-
- GitHub 绑定GitHub第三方账户获取
-
- 进士 2019年总版新获得的技术专家分排名前十
-
-
金牌
2020年7月 总版技术专家分月排行榜第一
2020年6月 总版技术专家分月排行榜第一
2020年5月 总版技术专家分月排行榜第一
2020年4月 总版技术专家分月排行榜第一
2020年3月 总版技术专家分月排行榜第一
-
-
hvae a try
for i := 0 to StringGrid1.Items.Count-1 do
begin
if StringGrid1.Items[i].Selected then
begin
//
end;
end;
-
等级
本版专家分：58
-
to gzmhero(hihihi)
你能稍微给个例子么？我就是没想通这个循环要怎么写？而且怎么判断哪行是最后一个出现Y的？
-
等级
本版专家分：58
-
to qybao(阿宝)
不明白这怎么用！！！
我怎么没有StringGrid1.Items啊？？？？
-
等级
本版专家分：12858勋章
-
-
红花
2006年3月 Delphi大版内专家分月排行榜第一
2006年2月 Delphi大版内专家分月排行榜第一
-
- 蓝花 2006年4月 扩充话题大版内专家分月排行榜第三
-
-
to qybao(阿宝)
不明白这怎么用！！！
我怎么没有StringGrid1.Items啊？？？？
－－－－－－－
你的StringGrid的Name不是StringGrid1吧，是什么就改成什么
-
等级
本版专家分：28920勋章
-
-
红花
2005年4月 Delphi大版内专家分月排行榜第一
2005年3月 Delphi大版内专家分月排行榜第一
-
-
黄花
2008年5月 Delphi大版内专家分月排行榜第二
2006年2月 Delphi大版内专家分月排行榜第二
-
-
for i:=0 to StringGrid1.RowCount-1 do
if StringGrid1.Cells[0,i]='Y' then
.................
-
等级
本版专家分：58
-
楼上各位大虾，经人指点，终于知道我哪里想错了，解决了，也谢谢各位大虾出手了
解决的思路：
for i:=1 to StringGrid1.RowCount-1 do begin
if StringGrid1.Cells[0,i]='Y' then begin
a:=i;
if b=0 then b:=a ;
end;
end;
-
等级
本版专家分：58
-
楼上各位大虾，经人指点，终于知道我哪里想错了，解决了，也谢谢各位大虾出手了
解决的思路：
for i:=1 to StringGrid1.RowCount-1 do begin
if StringGrid1.Cells[0,i]='Y' then begin
a:=i;
if b=0 then b:=a ; //这里当初没有判断if b=0 , 而是直接b:=a了，所以导致b一直被刷新
end;
end;
- delphi中stringgrid删除行
delphi中stringgrid删除行 TMyGrid = class(TStringgrid); 然后用 TMyGrid(stringgrid1).DeleteRow(stringgrid1.Row ); 可以删除选中的行.
- stringgrid 删除选中行
if (StrGridSensorList->Row>0) { for (int i=StrGridSensorList->Row;iRowCount-1;i++) { StrGridSensorList->Rows[i]->Assign(StrGridSensorList->Rows[i+1]); }
- Delphi将Stringgrid指定行添加到Memo控件中.rar
Delphi将Stringgrid指定行添加到Memo控件中，选中StringGrid中的行，点击右下角的“添加”按钮，即可将选中的StringGrid行数据添加到下边的Memo控件中显示。部分源代码如下： procedure TForm1.FormCreate(Sender:...
- (转)stringgrid删除选中行
定义一个从TStringGrid类继承的新类如下： type TMyGrid = class(TStringgrid); 之后，删除时：你可以这样写： TMyGrid(Grid).DeleteRow(Grid.Row); //Grid为你的StringGrid
- stringgrid多选拖拽换行
使用stringgrid实现行多选, 然后通过拖拽移动选择行位置 按住ctrl可以多选不连续的行
- StringGrid的Click事件中获取选中的当前行
StringGrid 的option中的goRangeSelect设置为false确保goRowSelect为true;然后procedure TfrmEvent.StringGrid1Click(Sender: TObject);begin doEveID.Text:=StringGrid1.Cells[0,StringGrid1.selection.bottom];...
- Delphi StringGrid常用属性和常用操作
StringGrid组件用于建立显示字符串的网格，与电子表格相似。它可使表格中的字符串和相关对象操作简单化。StringGrid组件提供了许多可控制网格外观念的属性，以及利用表格的结构响应用户操作的事件和方法。StringGrid...
- StringGrid实例 单元格变色等
StringGrid实例 单元格变色等 学好DELPHI 就是学好这个控件 个人感觉
- StringGrid选中数据的获取属性
StringGrid有Selection(TGridRect)的属性 StringGrid1.Selection.Left表示选择范围的左起列 StringGrid1.Selection.Top表示选择范围的上起行 故要得StringGrid的选择的记录，可以从 StringGrid1.Selection.Top循环到...
- Delphi使StringGrid中的每一格的颜色各不相同
Delphi使StringGrid中的每一格的颜色各不相同
- StringGrid控件的属性和使用
StringGrid控件的属性和使用 简介：StringGrid控件是一种很常用的表格显示控件，大家都知道在数据量比较大、需要按条目显示的时候，用表格显示会使整个显示简洁大方，有条理。 StringGrid控件用于建立显示字符...
- StringGrid指定某行列的背景和字体颜色
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);vars: String;R: TRect;beginwith StringGrid1 dobeginif ARow=0 then Canvas.Font.Co...
- Delphi StringGrid控件的用法
Delphi StringGrid控件 组件名称：StringGrid ●固定行及固定列： StringGrid.FixedCols:=固定行之数; StringGrid.FixedRows:=固定列之数; StringGrid. FixedColor:=固定行列之颜色; ...
- bcb之StringGrid控件使用
bcb新手，还有很多地方需要学习提升的，有不对的地方请提出来。 StringGird控件的基本设置 stringgrid1->ColCount = 6;//设置stringgrid1总列数 stringgrid1->RowCount = 4;//设置stringgrid1总行数 ...
- C++ builder6 选中的整行下移一位StringGrid行
软件使用C++ builder6 ，StringGrid选中行整行下移一位，行序号不随移动而变化，如需变化，则第一列的字符不需要互换
- StringGrid去掉第一行第一列的蓝色框
在StringGrid的OnDrawCell事件中加入下列语句：if gdSelected in State thenbegin stringgrid1.Canvas.Brush.Color:=stringgrid1.color; stringgrid1.Canvas.FillRect(rect); stringgrid1.Canvas.Font.Color:=...
- C++ Builder XE StringGrid组件，如何快速显示定位到某一行
我们经常会遇到需要定位并显示到某一行的处理方法： 其实方法很简单如下： AdvStringGrid1->Row=i+1; AdvStringGrid1->ColorRect(0,i+1,2,i+1,clRed); ...
- StringGrid
今天在书上看到了StringGrid的使用，写的例子很少，以前在做毕业设计时我也使用过这个控件，不过现在都很久没有使用这个控件了，所以都有点生疏了；其实一直以来我经常光顾的一个学习delphi的网站就是万一老师的博客...
- StringGrid行列的增加和删除
type TExCell = class(TStringGrid) public procedure DeleteRow(ARow: Longint); procedure DeleteColumn(ACol: Longint); procedure InsertRow(ARow: LongInt); procedure InsertColumn(ACol: LongInt);...
- 在StringGrid中每行添加一个选择框(checkbox)
StringGrid得实际使用中，经常会遇到这样的需求，用户想对每一行的记录作一个标记，想对做了标记的记录作特别的操作。例如想删除多条记录。 在网页中经常有类似的应用，例如在电子邮箱里，显示邮件的每一行都有一...
- c++builder stringgrid类
c++Builder组件StringGrid的使用说明
- 实现StringGrid的删除，插入，排序行操作（基本操作啦）
Procedure GridRemoveColumn(StrGrid: TStringGrid; DelColumn: Integer); Var Column: Integer; begin ... For Column := DelColumn To StrGrid.ColCount-1 d
- delphi中的StringGrid单元格光标走向
![图片说明]...delphi中的StringGrid单元格中我要选择如图所示，光标切换方向，选择横向的时候，则光标是横着走，选择纵向的时候这是竖着走请问各位大神要如何实现，我只要实现光标横向纵向走即可
- 鼠标按住后拖动StringGrid
var flag: Boolean; x1,y1: Integer; {初始化测试数据} procedure TForm1.FormCreate(Sender: TObject); var i,j: Integer;... StringGrid1.ColCount := 100;... StringGrid1.RowCount := 100;... StringGrid1.Al
- 如何在StringGrid控件中每格显示两行,且可以分别设置两行的颜色
procedure TForm1.Grid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);var Rect1:TRect; Rect2:TRect;begin Rect1.Left:=ACol*(Rect.Right-Rect.Left)+2;...
- 【Delphi学习】StringGrid常用属性和常用操作
StringGrid组件用于建立显示字符串的网格，与电子表格相似。它可使表格中的字符串和相关对象操作简单化。StringGrid组件提供了许多可控制网格外观念的属性，以及利用表格的结构响应用户操作的事件和方法。StringGrid...
- delphi的FMX中stringgrid背景色的问题
在OnDrawColumnCell添加StringGrid1DrawColumnCell方法，，源码如下： unit Unit3; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls,...
- stringgrid拖动换行
delphi stringgrid拖动换行 增加 删除 修改 delphi stringgrid拖动换行 增加 删除 修改