delphi中sringgrid如何让光标移动到指定行

在 Delphi 中，可以使用 StringGrid 的 `Row` 属性来设置当前选中的行。要将光标移动到指定行，可以将该行的行号赋值给 `Row` 属性即可。

例如，假设你要将光标移动到 StringGrid 的第 5 行，可以使用以下代码：

StringGrid1.Row := 4; // 注意行号是从0开始计数的

这将把当前选中的行设置为第 5 行，并将光标移动到该行。如果需要移动到其他行，只需要将相应的行号赋值给 `Row` 属性即可。

相关问题

delphi fdmemtable如何获取指定行的指定字段的值

要获取 Delphi FDMemTable 中指定行的指定字段的值，可以使用以下代码：

var
  FieldValue: Variant;
begin
  // 获取第 10 行的 "MyField" 字段的值
  FieldValue := FDMemTable1.FieldByName('MyField').Value;
end;

其中，`FDMemTable1` 是你的 FDMemTable 对象，`MyField` 是你要获取的字段名，`FieldValue` 是获取到的字段值。如果要获取指定行的值，可以使用 `FDMemTable1.RecNo` 属性指定当前行号，例如：

var
  FieldValue: Variant;
begin
  // 指定当前行为第 10 行
  FDMemTable1.RecNo := 10;
  
  // 获取当前行的 "MyField" 字段的值
  FieldValue := FDMemTable1.FieldByName('MyField').Value;
end;

delphi7在指定窗口中找到指定图片并单击

在Delphi中，可以使用Windows API函数来在指定窗口中找到指定图片，并模拟鼠标单击事件。具体步骤如下：

1. 获取目标窗口的句柄，可以使用FindWindow或FindWindowEx函数来获取。

2. 获取目标窗口的客户区坐标，可以使用GetClientRect函数来获取。

3. 使用BitBlt函数将目标窗口的屏幕图像复制到内存中。

4. 使用FindBitmap函数在内存图像中查找指定的位图，可以使用Graphics.pas单元中的TBitmap对象来表示位图。

5. 如果找到位图，计算位图在目标窗口中的坐标位置，并模拟鼠标单击事件。

下面是一个示例代码：

var
  hWnd: HWND;
  rect: TRect;
  bmp: TBitmap;
  pt, ptClient: TPoint;
  memDC, bmpDC: HDC;
  memBmp, bmpOld: HBITMAP;
begin
  // 获取目标窗口句柄
  hWnd := FindWindow(nil, '窗口标题');

  if hWnd <> 0 then
  begin
    // 获取目标窗口客户区坐标
    GetClientRect(hWnd, rect);

    // 创建内存DC和内存位图
    memDC := CreateCompatibleDC(0);
    memBmp := CreateCompatibleBitmap(GetDC(0), rect.Right - rect.Left, rect.Bottom - rect.Top);
    bmpOld := SelectObject(memDC, memBmp);

    // 将目标窗口的屏幕图像复制到内存中
    BitBlt(memDC, 0, 0, rect.Right - rect.Left, rect.Bottom - rect.Top, GetDC(hWnd), 0, 0, SRCCOPY);

    // 加载位图文件到TBitmap对象中
    bmp := TBitmap.Create;
    bmp.LoadFromFile('图片文件名');

    // 在内存图像中查找位图
    pt := FindBitmap(memDC, bmp, rect, 0);

    if (pt.X <> -1) and (pt.Y <> -1) then
    begin
      // 计算位图在目标窗口中的坐标位置
      ptClient.X := pt.X + rect.Left;
      ptClient.Y := pt.Y + rect.Top;

      // 模拟鼠标单击事件
      SendMessage(hWnd, WM_LBUTTONDOWN, MK_LBUTTON, MakeLParam(ptClient.X, ptClient.Y));
      SendMessage(hWnd, WM_LBUTTONUP, MK_LBUTTON, MakeLParam(ptClient.X, ptClient.Y));
    end;

    // 释放资源
    bmp.Free;
    SelectObject(memDC, bmpOld);
    DeleteObject(memBmp);
    DeleteDC(memDC);
  end;
end;

注意：在使用FindBitmap函数查找位图时，需要传入内存DC、TBitmap对象和目标窗口客户区坐标。如果找到位图，函数返回位图在内存图像中的坐标位置。同时，在模拟鼠标单击事件时，需要传入目标窗口的句柄和位图在目标窗口中的客户区坐标。