Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 307
  • Last Modified:

Create A File

Ok i want to create a file called   win34.dll

the file has to go to C:\Windows\win34.dll

sample code is appreciated such as uses var etc i am new at delphi


thanks in advance
0
neopolis
Asked:
neopolis
1 Solution
 
wimmeyvaertCommented:
Do you really want to create a DLL, or is this just an example, and is it a textfile you want to create.

The Mayor
0
 
wimmeyvaertCommented:
If you want to create an empty file, then use :
    FileClose(FileCreate(strFileName));

If you want to create a new file and write data to it, use :
var
  fAFile      : TextFile;
  strFileName : String;
  strData     : String;

  AssignFile(fAFile, StrFileName);  { Assign a FileName to the FilePointer }
  Rewrite(fAFile);  { Create the file and open it }
  Writeln(fAFile, strData); { Write data to the file. }
  Flush(fAFile);      { to be sure the data is written. }
  CloseFile(fAFile);  { Close the file file }
0
 
dluediCommented:
If you want to save a textfile with a dll extention then try this:

Just put a Memo and a button on your form. Then doubleclick on the button and insert this code:
Memo1.Lines.SaveToFile('C:\Windows\win34.dll');

Now you just start you program (F9).
If you press the button everything what you write in the memofield will be saved in C:\Windows\win34.dll
Hope I could help
:)dluedi
0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 
neopolisAuthor Commented:
ok it just a blank file i want to create, No text just create the file with the dll extension
i tried this     FileClose(FileCreate(strFileName));

but where do i put the Path and File name
and is there any var etc to put..
thanks
0
 
neopolisAuthor Commented:
i asked the question again but i explain more in detail this time, the help is good but i need to explain myself better sorry
0
 
wimmeyvaertCommented:
strFileName = Path + Filename

Example :
FileClose(FileCreate('C:\WinNt\System32\MyDll.Dll'));

Best regards,
The Mayor

0
 
Slick812Commented:
hello neopolis, To create and empty file with windows API use the CreateFile()

var
hFile1: HWND;
FileName: String;

FileName := "C:\Folder\File1.dll";
hFile1 := CreateFile(PChar(FileName), GENERIC_WRITE, FILE_SHARE_READ, nil, CREATE_NEW, FILE_ATTRIBUTE_NORMAL or FILE_FLAG_SEQUENTIAL_SCAN,0);

CloseHandle(hFile1);
0
 
geobulCommented:
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:

accept wimmeyvaert's comment as answer

Please leave any comments here within the next seven days.

PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER!

Thanks,

geobul
EE Cleanup Volunteer
0
 
wimmeyvaertCommented:
Hi Geobul,

Thanks for evaluating this question. Hope there will be a reaction from 'neopolis'.
Best regards,

The Mayor.
0
 
wimmeyvaertCommented:
Thanks for the accaptance, neopolis !!
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now