Delphi - crear directorios?

 
Vista:

crear directorios?

Publicado por Marcos (192 intervenciones) el 18/02/2004 14:46:15
HOla tengo un par de dudas que me gustaria me aclaren.

la primera es como crear un directorio? y como lo eliminarlo? como elimino el directorio y todo su contenido?

Y la segunda es como crear una base de datos en donde el usuario no sea SYSDBA ni su password el ya definido; con Interbase 5.5; quiero crear la bd pepito con username=PEPE y password= xxx y no me lo permite, saca el error 902 .... alquien sabe como hacer esto???

De antemano muchas gracias

_Marcos_
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:crear directorios?

Publicado por cuervo (262 intervenciones) el 18/02/2004 22:09:26
// un direcctorio lo creas asi:
mkdir('nueva carpetas');
// para borrar un directorio con archivos. y no lo mover a la papelera:
function DelDir(dir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));
with fos do
begin
wFunc := FO_DELETE;
fFlags := FOF_NOCONFIRMATION; sin confirmacion
pFrom := PChar(dir + #0);
end;
Result := (0 = ShFileOperation(fos));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
if deldir('c:\apache') = true then ShowMessage('carpeta borrada');
end;

con respecto a el login de la db, Creo que la exepcion 902 es porque el nombre de usuario no es correcto.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar