MBCS版本工程如何调UNICODE的函数接口,救命!

VC/MFC > ATL/ActiveX/COM [问题点数:20分,结帖人hyqwan11112]
等级
本版专家分:0
结帖率 100%
等级
本版专家分:1604
等级
本版专家分:432979
勋章
Blank
榜眼 2009年 总版技术专家分年内排行榜第二
2005年 总版技术专家分年内排行榜第二
Blank
进士 2018年总版新获得的技术专家分排名前十
Blank
银牌 2009年7月 总版技术专家分月排行榜第二
2009年3月 总版技术专家分月排行榜第二
2009年1月 总版技术专家分月排行榜第二
2005年7月 总版技术专家分月排行榜第二
2005年5月 总版技术专家分月排行榜第二
2005年3月 总版技术专家分月排行榜第二
Blank
优秀版主 优秀小版主
2015年8月优秀小版主
2015年9月优秀小版主
2015年5月优秀小版主
2015年2月论坛优秀版主
等级
本版专家分:1604
hyqwan11112

等级:

TStringGrid多选的复制与拷贝

function StringGridSelectText(mStringGrid: TStringGrid): string;var I, J: Integer; S: string;begin Result := ; if not Assigned(mStringGrid) then Exit; for J := mS

(转)stringgrid删除选中行

定义一个从TStringGrid类继承的新类如下:  type TMyGrid = class(TStringgrid); 之后,删除时:你可以这样写: TMyGrid(Grid).DeleteRow(Grid.Row); //Grid为你的StringGrid

TStringGrid选中某行时改变字颜色和背景色,支持鼠标右键

goRangeSelect := false ; //不允许选择多行goRowSelect := true ; //选择行procedure Tfm_main.Grid2DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);var s: String;...

实现TStringGrid的左对齐、居中和右对齐

//sgrdQty: TStringGrid procedure TfrmPDStock.sgrdQtyDrawCell(Sender: TObject; ACol, ARow: Integer;  Rect: TRect; State: TGridDrawState); var  sText: String;  iTextWidth: Integer;  rNum: Doub

StringGrid设置单元格信息

<br />BCB封装了StringGrid自绘消息OnDrawCell 我们只要重写该事件即可<br />事实上我们只要判断是否要自绘 但是如果StringGrid作为输入 需要设置任意一个单元格信息 那就要做些额外的工作<br />我们这里采用list...

StringGrid使用教程(Delphi)

StringGrid行列的增加和删除type TExCell = class(TStringGrid)public procedure DeleteRow(ARow: Longint); procedure DeleteColumn(ACol: Longint); procedure InsertRow(ARow: LongInt); procedure ...

delphi TStringGrid add CheckBox

思路: 重载DrawCell函数,根据Cell的值画Checked 和 UnChecked。 重载SelectCell函数,根据指定的列。变为只读然后修改cell的值进行重画。 代码如下: ...procedure TForm1.FormCreate(Sender: TObject);...

Delphi TStringGrid 类(1)

TStringGrid [1] - ColCount、RowCount、Cells  cCount := StringGrid1.ColCount; {获取总列数}   rCount := StringGrid1.RowCount; {获取总行数} {给每个单元赋值}  for c := 0 to StringGrid1....

Delphi StringGrid控件的用法

Delphi StringGrid控件 组件名称:StringGrid    ●固定行及固定列:  StringGrid.FixedCols:=固定行之数;  StringGrid.FixedRows:=固定列之数;  StringGrid....●资料行列之宽高

Delphi StringGrid使用全书( 一)

Delphi StringGrid使用全书( 一) 简介:  <br />(1)正确地设置StringGrid列宽而不截断任何一个文字方法是在对StringGrid填充完文本串后调用SetOptimalGridCellWidth过程<br />-----------程序片断--------------...

使TStringGrid自适应宽度

procedure AutoFitable(AGrids: TStringGrid);//传入TStringGrid对像即可, 2004/10/28,CoolSlobvar I, J: Integer; MaxLenRow: Integer; CurRowLen: Integer;begin inherited; for J := 0 to AGrids.ColCount -...

StringGrid使用大全

作者 : archonwang标题 : StringGrid使用全书 关键字: StringGrid 分类 : 开发经验 密级 : 公开 (评分:★★★★ , 回复: 11, 阅读: 9839) »»StringGrid行列的增加和删除type TExCell = class(TStringGrid)...

StringGrid的Click事件中获取选中的当前行

StringGrid 的option中的goRangeSelect设置为false确保goRowSelect为true;然后procedure TfrmEvent.StringGrid1Click(Sender: TObject);begin doEveID.Text:=StringGrid1.Cells[0,StringGrid1.selection.bottom];...

关于Delphi中二维数组的声明和大小调整

这是一个实例:procedure TMainForm.Button1Click(Sender: TObject);var arr:array of array of string;begin setlength(arr,2,3); arr[1,2]:=this is a test; setlength(arr,0,0); setlength(arr,4,5);...

065_《Delphi7组件编程参考手册》

本书是关于Delphi 7组件编程的、一本十分完整的参考手册。本书涵盖了Delphi 7集成开发环境的使用、介绍包括基本窗口组件、列表框组件、数据库组件等百余种组件的功能、属性、事件以及方法。 书中大部分组件都辅以了...

Delphi StringGrid常用属性和常用操作

StringGrid组件用于建立显示字符串的网格,与电子表格相似。它可使表格中的字符串和相关对象操作简单化。StringGrid组件提供了许多可控制网格外观念的属性,以及利用表格的结构响应用户操作的事件和方法。...

关于表格控件的OnDrawCell事件

在窗体中添加一个TStringGrid对象,可完成文本数据的表格化。TStringGrid组件提供了许多可控制网格外观的属性,以及利用表格的结构响应用户操作的事件和方法。TStringGrid具有关联对象与网格中的每个字符串的作用,...

怎樣刪除stringgrid中選中的一行?

TMyGrid = class(TStringgrid); TMyGrid(Grid).DeleteRow(Grid.Row); //Grid为你的StringGrid控件

Delphi的StringGrid使用技巧代码

StringGrid行列的增加和删除type TExCell = class(TStringGrid)public procedure DeleteRow(ARow: Longint); procedure DeleteColumn(ACol: Longint); procedure InsertRow(ARow: LongInt); procedure ...

树形控件比较

树形控件比较 也许是受到WINDOWS资源管理界面的影响,树形控件(TTreeView)在软件界面中的使用也越来越广泛,其直观的表现形式、方便的操作方式,确实为界面增色不少(是啊,仿资源管理器界面,看着都亲切).TTreeView在...

Delphi StringGrid隐藏表格中的一列

在stringgrid中要隐藏表格中的一列,有人说是stringgrid1.Columns[n].Visible:=false; 但经过试验没有Columns这个属性,所以也只能使用另一种方法StringGrid1.ColWidths[13]:=0; 但这个方法中也有一个不好的地方,将...

StringGrid单元格对齐方式及换行

我们使用StringGrid时,经常需要将标题行居中对齐,其它行根据需要,文本左对齐或居中对齐,数字右对齐等。... grdFileList为TStringGrid控件名。void __fastcall TForm1::grdFileListDrawCell(TObject *Sender, int AC

DBGridEh 改变行居中!

改变行高:在OnGetCellParams事件里//改变高使适应字体高度,你可以改成你自己想要的高度if TStringgrid(dbgrid1).RowHeights[dbgrid1.DataSource.DataSet.RecNo] TStringgrid(dbgrid1).RowHeights[dbgrid1....

使DBGrid具有FixedCols的效果

procedure TForm1.FormCreate(Sender: TObject);begin TStringGrid(DBGrid1).FixedCols:=2;end;procedure TForm1.DBGrid1ColEnter(Sender: TObject);begin if DBGrid1.SelectedIndex<TStringGrid(DBGr

Delphi cxGrid默认选中整行

Delphi cxGrid默认选择整行

Delphi操作Excel大全

转自 上帝的鱼--专栏 cdsn个人收藏:Delphi 控制Excel(一) 使用动态创建的方法首先创建 Excel 对象,使用ComObj:var ExcelApp: Variant;ExcelApp := CreateOleObject( Excel.Application );1) 显示当前窗口:...

Delphi XE8 FMX.TStringGrid Options 代码添加

![图片说明](https://img-ask.csdn.net/upload/201509/10/1441847761_248988.png) 以前直接是grdTableData.Options:=grdTableData.Options-[ColumnMove]; 现在不知道改成什么.....

delphi StringGrid单击表头进行高速排序

<br />unit Unit3;<br />interface<br />uses<br /> Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,<br /> Dialogs, Grids, DB, ADODB, DBGrids, ExtCtrls, StdCtrls;...

Delphi xe FireMonkey FMX StingGrid 点击表头排序

最近在尝试使用 delphi xe 的 FireMonkey 类库写东西,用到FMX 的 TStringGrid 控件,数据是运行时程序填充的,需要实现点击标题排序的功能,网上搜索了下,都是VLC TStringGrid 相关的代码,看来 FMX 还是很小众的...

TGridDrawState名字空间冲突问题及解决方法(E2015 Ambiguity between 'TGridDrawState' and 'Gridseh::...

作者:ccrun(老妖) 相信大家遇到过很多类似这样的问题,用了某些第三方组件后,编译时提示:E2015 Ambiguity between TGridDrawState and Gridseh::TGridDrawState或E2015 Ambiguity between TGridDrawState and ...