请教DELPHI编程实现:从EXCEL中复制内容拷贝到其它应用程序的窗口中。

admin 发表于 2011-03-04 20:37 浏览次数:

假设:桌面上有一EXCEL表格,单元格A1至A2中记录了我的QQ号码和登录密码。

打开QQ的登录窗口,如何通过DELPHI程序实现,将单元格A1至A2的数据自动填写到登陆界面的两个输入框中?

因工作需要,要将电子表格中的很多数据录入到某软件中去。希望能将工作得到简化。特来请教高手,非常感谢!

分类: Delphi | 评论数: 3 | 阅读全文

如何处理WINXPSP3开发的程序在VISTA,WIN7,WIN2008都能使用

admin 发表于 2011-03-04 20:23 浏览次数:

如何处理WINXPSP3开发的程序在VISTA,WIN7,WIN2008都能使用
问题:
  现在在WINXP SP3的环境下+DELPHI7开发了一个程序,在WINXPSP3下运行
都能实现相关的功能,但是在VISTA,WIN7,WIN2008下运行时就有些界面及相关
功能就是不能实现,不知这是为什么》》》》》》》》》》

分类: Delphi | 评论数: 7 | 阅读全文

有没有可以显示lossless方式压缩的jpeg图像控件呢?

admin 发表于 2011-03-04 20:07 浏览次数:

有没有可以显示lossless方式压缩的jpeg图像控件呢?我试了imageen,FastLib,freeimage,ImageFileLib,JVCL,EnvisionImageLibrary,GraphicEx等等都不行,为什么这种格式的图像都不支持呢?郁闷!

分类: Delphi | 评论数: 0 | 阅读全文

问一个关于list语法相关的问题

admin 发表于 2011-03-04 19:41 浏览次数:

Plocationrecord是我自己定义的一个结构体
type
  Plocationrecord=^_locarecord; // 将行号和id 存放一起
  _locarecord=record 
  lowrow:integer;
  highrow:integer;
  firendid:integer; //放id
  End;

Delphi(Pascal) code
procedure TForm1.Button2Click(Sender: TObject); var location:Plocationrecord; begin new(location); location.lowrow:=1; location.highrow:=11; location.firendid:=111; if locationList.IndexOf(location)=-1 then//这里的location值不都是一样吗?为什么跟着显示的不一样呢? locationList.Add(location); ShowMessage(IntToStr(locationList.Count)); end;

我的问题就是IndexOf如何检测结构体呢?因为每次单击button,它的Count就加1

分类: Delphi | 评论数: 7 | 阅读全文

带有密码保护的邮件发送程序

admin 发表于 2011-03-04 19:38 浏览次数:

怎样用java做啊?

分类: Delphi | 评论数: 0 | 阅读全文

用delphi如何写vpn拔号连接,有无控件或例程

admin 发表于 2011-03-04 19:27 浏览次数:

用delphi如何写vpn拔号连接,有无控件或例程

分类: Delphi | 评论数: 4 | 阅读全文

关于cxGrid冻结分组标头

admin 发表于 2011-03-04 19:26 浏览次数:

cxGrid按某一列分组后,在向下拖动右边的滚动条浏览明细时,能否像excel那样吧分组标头冻结

分类: Delphi | 评论数: 2 | 阅读全文

cxtreelist怎么添加、删除、修改数据

admin 发表于 2011-03-04 19:21 浏览次数:

如上所述

分类: Delphi | 评论数: 1 | 阅读全文

delphi 请教下什么叫单元提取

admin 发表于 2011-03-04 19:16 浏览次数:

新人求前辈们指点下:

首先将delphi中Controls单元提取

不明白什么叫单元提取

分类: Delphi | 评论数: 5 | 阅读全文

求一个小程序代码

admin 发表于 2011-03-04 19:15 浏览次数:

就是一个独立的小程序,远程读取服务器上的CSV数据,然后指定关键字查询和现实特定内容。

比如CSV存在www.baidu.com/1.csv,指定关键字1022,从服务器的CSV中查询1022关键字,以及临行数据,显示在软件里面。

分类: Delphi | 评论数: 1 | 阅读全文

有用过resharper的吗

admin 发表于 2011-03-04 17:51 浏览次数:

我安装后,打开vs2005时,提示键盘快捷键有问题。当前键盘scheme是只读的,改变keyboard scheme然后重试。
请问这个keyboard scheme在哪,如何修改啊

分类: Delphi | 评论数: 0 | 阅读全文

TWebbrowse的问题。

admin 发表于 2011-03-04 17:50 浏览次数:

navigate一个本地HTML文件,但是JS全部不能运行。

就连最简单的JS也不行。也试了修改IE设置似乎对此没有影响。

分类: Delphi | 评论数: 0 | 阅读全文

一个很简单的问题,希望能帮我解决。

admin 发表于 2011-03-04 17:33 浏览次数:

也就是我用delphi编写了一个程序,也就是我要加入另外一个程序(另外一个程序已经写好),我怎么才可以在2个程序都能添加到编辑器里,也就是把2个写好的程序的源代码一起添加到一个应用程序里

分类: Delphi | 评论数: 5 | 阅读全文

如何双击文件获得文件名和路径?

admin 发表于 2011-03-04 17:32 浏览次数:

例如C盘下有个文件“try.txt”,如何用delphi编程,进行监控:当打开该文件时,在memo1中显示文件名和路径?只有34分了。

分类: Delphi | 评论数: 76 | 阅读全文

点“复制”按钮,把listbox的内容复制到剪贴板?

admin 发表于 2011-03-04 17:32 浏览次数:

求教
点“复制”按钮,把listbox的内容复制到剪贴板

分类: Delphi | 评论数: 3 | 阅读全文

请叫一个UPDATE的方法.

admin 发表于 2011-03-04 17:32 浏览次数:
Delphi(Pascal) code
with qry7 do begin close; SQL.Add('update stockpile set 代用计数=代用计数+:a where 部品品番=:b and convert(char(7),结存日期,121)=convert(char(7),dateadd(mm,-1,getdate()),121)'); Parameters.ParamByName('b').Value:=Trim(cxLookupComboBox3.Text); Parameters.ParamByName('a').Value:=(pyjc-dy); ExecSQL; end; //更新前 代用计数=200,现在:a计算结果=18,在更新后应该是218,但现在结果是18.请指教教了.
分类: Delphi | 评论数: 4 | 阅读全文

谁有winpcap for delphi请给我一份!送高分!

admin 发表于 2011-03-04 17:32 浏览次数:

谁有winpcap for delphi请给我一份!送高分!

分类: Delphi | 评论数: 10 | 阅读全文

不知道会不会火星!

admin 发表于 2011-03-04 17:32 浏览次数:

很久就下载delphi2010但是由于工作一直没安装!不知道现在是update多少了!知道的朋友告诉下小弟!

分类: Delphi | 评论数: 8 | 阅读全文

请教一个delphi中关于dbgrideh中cell的问题

admin 发表于 2011-03-04 17:31 浏览次数:

我使用dbgrideh做简单进销存软件,做一张进货单用dbgrideh显示编辑商品信息,当我向dbgrideh中插入一条数据后,包含字段(商品名称,规格,单位, 单价,数量,小计价),我想让插入成功后,让数量那个cell得到焦点,可直接输入数值,要怎么操作呢?谢谢。

分类: Delphi | 评论数: 4 | 阅读全文

请问这是什么格式的图片?

admin 发表于 2011-03-04 17:31 浏览次数:

部分代码:

Delphi(Pascal) code
try idhttp.Get(PICURL,imagestream); except showmessage('连接失败,不能获得图片!'); end; imagestream.Position:=0; if imagestream.Size = 0 then begin imagestream.Free; ShowMessage('错误'); end; imagestream.ReadBuffer(Buffer,2); imagestream.Position:=0; showmessage(IntToStr(Buffer)); if Buffer=$4D42 then begin ShowMessage('BMP'); end else if Buffer=$D8FF then begin ShowMessage('JPG'); end else if Buffer=$4947 then begin ShowMessage('GIF'); end else if Buffer=$050A then begin ShowMessage('PCX'); end else if Buffer=$5089 then begin ShowMessage('PNG'); end else if Buffer=$4238 then begin ShowMessage('PSD'); end else if Buffer=$A659 then begin ShowMessage('RAS'); end else if Buffer=$DA01 then begin ShowMessage('SGI'); end else if Buffer=$4949 then begin ShowMessage('TIFF'); end else //如是其他类型的文件的话,直接显示错误 begin ShowMessage('ERR'); end; finally imagestream.Free; end;

在showmessage(IntToStr(Buffer));的时候显示 35615
然后提示 ERR

证明获得图片不是程序中所列的图片类型,请教 使用showmessage(IntToStr(Buffer));的时候显示 35615的图片是什么图片呢?

if Buffer=???? then 这里????的值是什么呢?

(使用火狐浏览器查看这个图片是jpg图片,但实际jpg图片使用showmessage(IntToStr(Buffer));的时候显示 55551)

分类: Delphi | 评论数: 8 | 阅读全文

返回首页 | 关于我们 | 联系我们 | 广告合作 | 网站地图 | 友情链接 | 版权声明