Obsługa plików > Input - polecenie

Drukuj

Input - polecenie symp

Polecenie umożliwia wczytanie linii tekstu z pliku dyskowego lub z klawiatury do podanych zmiennych. Jeżeli wprowadzono więcej linii tekstu niż zostało zdefiniowanych zmiennych to zostaną one umieszczone w ostatniej z podanych zmiennych.

Jeżeli plik, z którego odczytywane są dane jest otwarty w trybie BINARY, to wczytywanie danych do zminnych typu Char, Int, Long i Float odbywa się binarnie tzn odpowiednio po 1, 2, 4, lub 8 bajtów.

Polecenie wczytywania z klawiatury wyświetla okno dialogowe, w którym można wprowadzić dowolną liczbę linii tekstu. Kolejne linie są umieszczane w kolejnych zmiennych.

 

Składnia

Int Input String  prompt, String  lista_zm

lub

Int Input Int  #numerPliku, String  lista_zm

 

Argumenty

Typ

Nazwa

Opis

String

prompt

Tekst wypisywany jako zachęta do wprowadzania danych. Tekst zachęty powinien być wpisany bezpośrednio w linii polecenia, a nie deklarowany jako zmienna.

Int

numerPliku

Numer identyfikujący plik.

String

lista_zm

Lista zmiennych tekstowych, do których będą wczytane kolejne linie wejściowe.

 

Wartość zwracana

Różna od zera, w przypadku poprawnego wczytania linii do wszystkich zmiennych.

Zero, w przypadku niepowodzenia lub końca pliku.

Dla plików otwartych w trybie BINARY wczytywanych binarnie, informacja o poprawnym wykonaniu polecenia tylko w przypadku wczytania dokładnie potrzebnej liczby bajtów.

 

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