We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
COURSE of the MONTH
13 days, 10 hours left to enrollBecome a Premium Member and unlock a new, free course in leading technologies each month.
Solved
Create a File Exact Syntax
Posted on 2001-08-22
Hello i want the Exact Syntax as if you were doing this yourself
Create a File called abc.dat in C:\
so the path is C:\abc.dat
ok i want to push a button and the file has been created
the file is empty no data just a blank file...
thanks in advance neopolis
i am new at delphi so i need exact code...
Create a File called abc.dat in C:\
so the path is C:\abc.dat
ok i want to push a button and the file has been created
the file is empty no data just a blank file...
thanks in advance neopolis
i am new at delphi so i need exact code...
[X]
Welcome to Experts Exchange
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
- Help others & share knowledge
- Earn cash & points
- Learn & ask questions
2-
2
- +1
6 Comments
Hi there,
procedure CreateFile(const aFileName: string);
var
F: TextFile;
begin
AssignFile(F, aFileName);
Rewrite(F);
CloseFile(F);
end;
Regards Jacco
procedure CreateFile(const aFileName: string);
var
F: TextFile;
begin
AssignFile(F, aFileName);
Rewrite(F);
CloseFile(F);
end;
Regards Jacco
i cant get it to write the abc.dat file can you create it in Delphi the copy the source code and paste it here
so i can see where the File name and Path go thanks
so i can see where the File name and Path go thanks
Ummmmm, take the above procedure & call it like so:
createFile('C:\abc.dat');
simple enough, no? Parameter passing is a _very_ basic element of any language, I would think that you'd be well served by a couple of hours reading your manual.
GL
Mike
createFile('C:\abc.dat');
simple enough, no? Parameter passing is a _very_ basic element of any language, I would think that you'd be well served by a couple of hours reading your manual.
GL
Mike
Here is the complete usage of the code!
Hope it helps!
VSF
www.victory.hpg.com.br
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure CreateFile(const aFileName: string);
var
F: TextFile;
begin
AssignFile(F, aFileName);
Rewrite(F);
CloseFile(F);
end;
procedure TForm1.Button1Click(Sender
begin
CreateFile('c:\abc.dat');
end;
end.
Hope it helps!
VSF
www.victory.hpg.com.br
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure CreateFile(const aFileName: string);
var
F: TextFile;
begin
AssignFile(F, aFileName);
Rewrite(F);
CloseFile(F);
end;
procedure TForm1.Button1Click(Sender
begin
CreateFile('c:\abc.dat');
end;
end.
I'm glad I could help!
VSF
UIN: 14016999
Please show your support by visiting my homepage:
www.victory.hpg.com.br
www.enge.cjb.net
VSF
UIN: 14016999
Please show your support by visiting my homepage:
www.victory.hpg.com.br
www.enge.cjb.net
Featured Post
We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Question has a verified solution.
If you are experiencing a similar issue, please ask a related question
Objective:
- This article will help user in how to convert their numeric value become words.
How to use
1. You can copy this code in your Unit as function
2. than you can perform your function by type this code
The Code
(CODE)
The Im…
Hello everybody
This Article will show you how to validate number with TEdit control,
What's the TEdit control?
TEdit is a standard Windows edit control on a form, it allows to user to write, read and copy/paste single line of text.
Usua…
Monitoring a network: how to monitor network services and why? Michael Kulchisky, MCSE, MCSA, MCP, VTSP, VSP, CCSP outlines the philosophy behind service monitoring and why a handshake validation is critical in network monitoring. Software utilized …
In this video, Percona Solution Engineer Dimitri Vanoverbeke discusses why you want to use at least three nodes in a database cluster.
To discuss how Percona Consulting can help with your design and architecture needs for your database and infras…
Suggested Courses
Course of the Month13 days, 10 hours left to enroll
800 members asked questions and received personalized solutions in the past 7 days.
Join the community of 500,000 technology professionals and ask your questions.