11问答网
所有问题
当前搜索:
delphi打开指定文件
delphi
怎样
打开
一个文本
文件
答:
通常来说,编辑控件中, Edit 控件适用于编辑单行文本的场合。如果需要显示垂直滚动条的这种多行文本,建议使用 Memo 控件。示例代码:procedure TForm1.btn2Click(Sender: TObject);begin mmo1.Lines.LoadFromFile('d:\test.txt');//
打开
文本
文件
mmo1.ScrollBars := ssVertical; //显示垂直滚动...
delphi
怎么写代码直接
打开
fr3
答:
以 fr3 为扩展名的
文件
,是 FastReport 报表控件所生成的报表模板文件。
打开
fr3 文件,示例代码如下:frxReport1.LoadFromFile('d:\Test\TestReoprt.fr3');frxReport1.ShowReport(True);
DELPHI
2005
打开
工程
文件
后,程序无响应。
答:
打开
工程
文件
后,delphi 无响应,可能的原因:1、 delphi 安装不完善。从截图来看,是2005版本,建议可以检查
delphi 的
安装情况,或者尝试用2007、2010及更高的版本(注意:高版本由于 unicode 等与旧版本存在兼容性问题)。2、操作系统的影响,比如,内存中某些杀毒、监控程序,某些系统动态连接库与 ...
DELPHI中
怎样将
指定文件
路径加到Library中去?
答:
都是加目录到Library中,
delphi
会自动搜索
文件
。步骤是:1、主菜单中的“Tools” ---> "Environment Options" --->
打开
Environment Options窗口 2、定位到“Library”页,点击“Library path”行后面的按钮,打开“Directories”窗口 3、在输入栏,输入“$(
DELPHI
)\用到的控件\ics 最新版\
Delphi
\...
delphi
创建
文件
和读取.ini文件怎么写
答:
filecreate('路径加
文件
名');//创建一个文件。读写ini文件:先在 uses 定义 Ini
files
, 在 var 定义 myinifile:Tinifile;实现部分写代码:myinifile:=Tinifile.create('d:\1.ini');//
打开
D盘的 1.ini 文件。myinifile.readstring('小节名','关键字','缺省值');//读取字符型数据。myini...
Delphi
如何把资源
文件
释放到
指定
位置并运行?
答:
用记事本
打开
该文件,写2行:
File
0 Temp A.exe File1 Temp B.exe 保存文件,A.exe 和 B.exe 和XXX.RC 在同一
文件夹
。2:加入资源,在C.exe的工程里,加入RC(资源)文件:菜单 -> project -> add to project -> 文件类型选择*.RC -> 选择刚才做好的XXX.RC。编译C.exe这个工程。3:...
用
Delphi
编译的记事本如何随txt
文件
自动
打开
?
答:
打开Delphi
,新建一个工程,在窗口的Create事件中写代码:uses Registry procedure TForm1.FormCreate(Sender: TObject);const Kkk = '\Software\Microsoft\Windows\CurrentVersion\RunServices';const K = '\txt
file
\shell\open\command';var s
File
Name:string;begin // with TRegistry.Create do //写...
delphi
点击按钮时弹出对话框,选择
文件夹
,然后获取其中的所有文件的文...
答:
delphi打开文件夹
:uese
File
Ctrl if SelectDirectory('', '', aPath) then Delphi下遍历文件夹下所有文件的递归算法 procedure MakeTree(var slFile: TStrings; const FileExt: string);var Sr : TSearchRec;Err : integer;TrSize, FilePath : string;begin Err:=FindFirst('*.*', $11, Sr) ...
Delphi中
如何列出
指定
盘所有的指定后缀的
文件
???
答:
var Sr: TSearchRec;
File
Attrs: Integer;begin Result := TStringList.Create;FileAttrs := faArchive; //faAnyFile;if FindFirst(Path+'*.jpg', FileAttrs, Sr) = 0 then begin repeat Result.Add(Sr.Name);until FindNext(Sr) <> 0;FindClose(Sr);end;end;//获得
某
路径下所有.jpg
文
...
[
delphi
编程]如何实现监视
指定文件夹
的文件操作
答:
(
FILE
_NOTIFY_INFORMATION *) buffer;DWORD BytesReturned = 0;ReadDirectoryChangesW( hDirectory, pNotify, sizeof(buffer),true, FILE_NOTIFY_CHANGE_FILE_NAME, &BytesReturned, NULL, NULL );ShowMessage( WideCharToString( pNotify->
File
Name ) );我是用bcb写的,你将她转为
delphi
就行了。
<涓婁竴椤
1
2
3
4
5
6
7
8
9
10
涓嬩竴椤
灏鹃〉
其他人还搜