Obsługa plików > Print - polecenie | | Drukuj |
Polecenie powoduje wpisanie do pliku lub na ekran listy argumentów, dokonując automatycznej konwersji wszystkich typów do postaci tekstów. Polecenie pisania na ekranie automatycznie dzieli tekst na linie o szerokości strony, a linie nie mieszczące się na stronie (wychodzące poza wysokość strony) są automatycznie przenoszone na następną stronę. Nowa strona jest tworzona automatycznie i ma takie same parametry jak strona poprzednia.
Składnia
Int Print lista_arg
lub
Int Print At x, y, lista_arg
lub
Int Print Int #numerPliku; lista_arg
Argumenty
Typ |
Nazwa |
Opis |
||||||
lista_arg |
Lista argumentów do wpisania do pliku lub na ekran, oddzielona separatorami. Argumentami mogą być zmienne, wartości bezpośrednie lub wyrażenia dowolnego typu prostego. Jako separator może być użyty przecinek lub średnik: •średnik - powoduje wpisanie kolejnego argumentu bezpośrednio za poprzednim (bez przerwy) •przecinek - powoduje wstawienie jednego znaku tabulacji pomiędzy wypisywanymi argumentami Wstawienie jako argumentu predefiniowanej zmiennej LF powoduje przejście do następnego wiersza. |
|||||||
numerPliku |
Numer identyfikujący otwarty plik (nie może być bazą danych), do którego zostaną wpisane argumenty. |
|||||||
x |
Położenie początku tekstu na ekranie; określa odległość od lewego marginesu strony. Jako odległość może być podana dowolna liczba lub wyrażenie, a także jeden z symboli specjalnych:
|
|||||||
y |
Położenie początku tekstu na ekranie; określa odległość od górnego marginesu strony. Jako odległość może być podana dowolna liczba lub wyrażenie, a także jeden z symboli specjalnych:
|
Powyższe stałe symboliczne mogą być używane w uproszczonych wyrażeniach określających przesunięcie tekstu względem określonego miejsca, np: Print At #x + 20, #y - 10, "to jest tekst".
Wartość zwracana
Zero, gdy lista argumentów została wpisana.
Różna od zera, jeśli wystąpił błąd wpisywania.
Przykład
//Zdefiniowanie nazwy pliku wraz ze ścieżką dostępu
String Plik_w = KatalogFirmy() + "Plik.txt"
//Otwarcie nowego pliku
Int Numer_pliku = Open Plik_w For output
//Wprowadzenie danych z klawiatury
String Wiersz1
Input "Proszę wpisać 1 wiersz tekstu", Wiersz1
//Wpisanie wprowadzonych danych do pliku
Print # Numer_pliku; Wiersz1
//Wpisanie wprowadzonych danych na ekran
Print "Wpisano do pliku wiersz:", Wiersz1, LF
//Zamknięcie pliku
Close Numer_pliku
//Otwarcie pliku do odczytu
Int Numer_plik = Open Plik_w For input
//Odczytanie jednej linii z pliku
String Zawartosc
Input # Numer_plik, Zawartosc
//Wpisanie odczytanych danych na ekran
Print "Odczytano z pliku wiersz:", Zawartosc, LF
//Zamknięcie pliku
Close Numer_plik