看流星社区

 找回密码
 注册账号
查看: 3086|回复: 1

[Delphi] Delphi读取文本内容

[复制链接]

该用户从未签到

发表于 2014-8-7 09:08:13 | 显示全部楼层 |阅读模式
program Project2;

uses
  Windows;

var
  MyTextFile : TextFile;
  ALine : string;
begin
  AssignFile(MyTextFile,'FileName.Txt');
  Reset(MyTextFile);
  ReadLn(MyTextFile,ALine);
  MessageBox(0, PChar(Aline), '', 0);
end.

该用户从未签到

发表于 2018-10-23 21:12:11 | 显示全部楼层
辛苦辛苦,谢谢了~~
点击按钮快速添加回复内容: 支持 高兴 激动 给力 加油 苦寻 生气 回帖 路过 感恩
您需要登录后才可以回帖 登录 | 注册账号

本版积分规则

小黑屋|手机版|Archiver|看流星社区 |网站地图

GMT+8, 2024-3-29 08:55

Powered by Kanliuxing X3.4

© 2010-2019 kanliuxing.com

快速回复 返回顶部 返回列表