提示:可以添加一个布尔来控制可否拖动的状态,这里提供所有都能拖动的方法. procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin ReleaseCapture; SendMessage(Handle,WM_NCLBUTTONDOWN,HTCAPTION,); end;

delphi调用外部程序打开文件 ShellExecute的各种用法 一.利用系统默认的邮件收发器发送电子邮件 Uses ..., ShellAPI; Var lpHwnd: HWND; lpOperation, lpFile, lpParameters, lpDirectory: String; Begin lpHwnd:= GetDesktopWindow(); lpOperation:= 'open'; lpFile:= 'mailto:' + 'Maple119@263.net' + '

在 Windows 10 中,通用应用程序在桌面环境下是支持从资源管理器拖放文件打开的. 这篇博文将演示拖放图片或文本文件,并在程序中打开显示. 前台 XAML: <Page x:Class="DropDemo.MainPage" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2

C#中实现文件拖放打开的方法 设置Form属性 AllowDrop = True; 在Form事件中 private void Form1_DragDrop(object sender, DragEventArgs e) { ).ToString();//文件完整路径 string extension = System.IO.Path.GetExtension(localFilePath);//文件后缀名 if (extension == ".cbd") { //todo you co

问题情况:每次在delphi中打开了N个单元的窗口,关闭delphi后,第二天还得一个一个打开单元窗口.问题原因:这是因为delphi的记忆功能未打开.问题处理:Tools->Options...->Environment Options->Autosave options->Project desktop 打上对号.

转自:万一的博客. 原理分析: 这需要用到 ShellAPI 单元的两个函数: DragAcceptFiles.DragQueryFile; 用 DragAcceptFiles(窗口句柄, True); 以让窗口能够接受拖放; 然后就等待 WM_DROPFILES 消息, 并用 DragQueryFile 函数处理消息参数, 从而获取信息. 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classe

unit UntOpenMenu; //download by http://wwww.NewXing.com interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Menus,registry; type TFrmMain = class(TForm) MainMenu1: TMainMenu; F1: TMenuItem; open: TMenuItem; Recent

Delphi 打开串口与关闭串口 procedure TForm1.btn1Click(Sender: TObject); begin cm1.CommName:=cbb1.Text; cm1.BaudRate:=strtoint(cbb2.Items[cbb2.ItemIndex]); case cbb3.ItemIndex of :cm1.ByteSize:=_5; :cm1.ByteSize:=_6; :cm1.ByteSize:=_7; :cm1.ByteSize:=_8; end; c

保存 和 打开 TREE VIEW的节点已经展开的状态 如果每次打开后能自动读取上次展开的状态就会非常快捷 下载地址: 实现方法 将已经展开的节点索引 放在一个文本中最后选中的那个节点索引放在最后一位然后通过下面这个代码这实现 {   TreeView1.Items[0].Expand(False); //按节点索引 展开节点一级   TreeView1.Select(TreeView1.Items[1],[]);// 按节点索引 选中节点 } TreeView1.Selected.Absolu

unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Menus, StdCtrls; type TForm1 = class(TForm) Button1: TButton; PopupMenu1: TPopupMenu; fgh1: TMenuItem; drg1: TMenuItem; dg1: TMenuItem; pro

取消自动创建窗体 Form1关键代码 implementation uses Unit2; {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin if not Assigned(Form2) then //assigned 是用来判断某一指针(pointer)或过程引用是否为nil(空),如果为空则返回假(false). begin Form2 := TForm2.Create(Self); Form2.Show; en

在APPBOX某页中如何使用button按钮打开一个新的链接页.比如说百度.谷歌等 在后台的单击事件中使用以下语句即            string url = "DownloadImage.aspx?ids=" + ids;                  string js = @"window.open('" + OriginalPageName + "','_blank')";//打开新页面                  Pag

delphi  安装卸载ocx 请参见 如下 http://blog.csdn.net/xt_chaoji/article/details/7027298 打开Delphi,关闭所有项目. 1.      安装OCX控件 点击菜单项:Component -> Import ActiveX Control… 进入如下界面: 然后点击按钮“Add..”,弹出如下界面选择Ocx文件:   注意:如果是DLL文件,则可能不会出现,需要将文件类型切换为所有. 选中目标文件后,该Ocx或者DLL对应的OCX

安装了 Delphi Xe4 之后打开这个地址就是完整的官方的文档了. 虽然不是立刻能解决你的问题. 但也是必须要看一遍的. 最基础的都在这里了. ms-help://embarcadero.rs_xe4/rad/IOS_Tutorials'3A_Delphi_iOS_Application_Development.html iOS Topics Preparing Your Development Environment: Working with a Mac and a PC Install

在网页打开本地应用程序示例: 一.在本地注册表自定义协议:以自定义调用Viso为例 1.在HKEY_CLASSES_ROOT下添加项ZVISIO. 2.修改ZVISIO项下的"(默认)"键值为"URL:自定义协议".这部分可以自己随便写. 3.在ZVISIO项下再添加一个键值"URL Protocol",值随便. 4.在ZVISIO项下新建项"shell" 5.在shell项下新建项"open" 6.在op

Delphi XE2 三个新功能介绍举例_西西软件资讯  http://www.cr173.com/html/13179_1.html delphi 2007新功能简介-davidxueer-ChinaUnix博客  http://blog.chinaunix.net/uid-217463-id-2689877.html [转]Delphi XE6新增特性及功能_红鱼儿_新浪博客  http://blog.sina.com.cn/s/blog_44fa172f0101rz6n.html Delp

关于delphi点击webbrowser中任意一点的问题 有时候我们需要delphi载入webbrowser1打开网页的时候 需要点击某一个点的位置 可能是坐标 可能是按钮 可能是其他的控件应该如何来实现呢? 这里来简单说明一下点击坐标的过程点击过程很明显我们移动鼠标来点击或者发送消息来点击移动鼠标点击的比较常见 这里详细说明一下发送消息来点击的办法发送消息来点击的思路是sendmessage()发送消息来实现的导入句柄 点击的就可以了.但是这里的句柄(webbrowser的句柄)其实是不好找的

打开网页对话框,一般有三种方法:window.open.window.showModalDialog.window.showModelessDialog,每一种都有它的优点与不足.第一种方法:window.open是大家常用的方法,它兼容所有的浏览器,打开一个新网页窗口很简单,但这种方法打开的“对话框”它默认的情况下是不支持交互(比如:获得返回值)与挂起操作(即:打开后若没有关闭,则其它网页窗口均无法操作,处于挂起等待状态):第二.第三种方法:window.showModalDialog.win

该app为应用的功能为给你的iPhone打开google地图有效地址连接 现版本 SDK 8.4 Xcode 运行Xcode 选择 Create a new Xcode project ->Single View Application 命名 OpenURL (1)  在xCode打开 ViewController.h 文件 (红色为所添加的代码) #import <UIKit/UIKit.h> @interface ViewController : UIViewController -

测试例子: 外网电脑D:\TEST\delphiTest\webbrowsetest 参考文档: delphi 操作WebBrowser 元素值 http://hi.baidu.com/kinglike/item/c4608a8e55313f874514cf5c delphi中WEBBrowser网页JS函数调用delphi函数 http://blog.csdn.net/iseekcode/article/details/4740269 webbrowser精华内容 http://blog.cs