Pokazywanie postów oznaczonych etykietą Zapis do pliku. Pokaż wszystkie posty
Pokazywanie postów oznaczonych etykietą Zapis do pliku. Pokaż wszystkie posty

04 lutego 2014

Zapis do pliku w PL/SQL

W prosty sposób mozna zapisać do pliku używając pakietu UTL_FILE.

CREATE DIRECTORY test_dir AS 'c:\';
-- CREATE DIRECTORY test_dir AS '/tmp';
DECLARE
fileHandler UTL_FILE.FILE_TYPE;
BEGIN
fileHandler := UTL_FILE.FOPEN('test_dir', 'test_file.txt', 'W');
UTL_FILE.PUTF(fileHandler, 'Writing TO a file\n');
UTL_FILE.FCLOSE(fileHandler);
EXCEPTION
WHEN utl_file.invalid_path THEN
raise_application_error(-20000, 'ERROR: Invalid PATH FOR file.');
END;
/

24 lipca 2007

Inny sposób zapisu do pliku[JAVA]

Istnieje również inny sposób zapisu do pliku taki jak:

RandomAccessFile save1;
save1 = new RandomAccessFile("test.txt","rw");
save1.writeBytes(line);


Zapis z koncem linii:
l = save1.length();
save1.seek(l);
RandomAccessFile save1;
save1 = new RandomAccessFile("test.txt","rw");
save1.writeBytes(line);

04 lipca 2007

Zapis do pliku PDF[DELPHI]

Jeśli chodzi o raport w rave reports to można to zrobić tak:

1.Umieść na formularzu komponenty RvProject1, RvSystem1, RvRenderPDF1, przycisk (Button).
2. Zmień właściwość Caption przycisku na:
Zapisz raport jako PDF
3. Ustaw właściwość Engine komponentu RvProject1 na RvSystem1.
4. Ustaw właściwość ProjectFile komponentu RvProject1 na plik raportu Raport.rav. (trzeba sobie wcześniej zrobic raport np w rave vusual designerze)
5. Oprogramuj zdarzenie onClick dla przycisku zapisującego raport do pliku *.pdf.

procedure TForm1.Button1Click(Sender: TObject);
begin
//przeznaczeniem raportu ma być plik
RvSystem1.DefaultDest := rdFile;
RvSystem1.DoNativeOutput := false;
//obiektem renderującym będzie komponent RvRenderPDF1
RvSystem1.RenderObject := RvRenderPDF1;
//plik zostanie zapisany pod nazwą plikpdf.pdf w katalogu projektu
RvSystem1.OutputFileName := 'plikpdf.pdf';
RvSystem1.SystemSetups := RvSystem1.SystemSetups - [ssAllowSetup];
//wywołanie metody Execute zapisze raport do pliku plikpdf.pdf
RvProject1.Execute;
end;