W procedurze twlist(...) ilość begin=4, a ilość end=3!!! Tu wyskakuje Twój error,ale dalej też są. Np nieznana proc. dodaj(...), Trzeba dalej analizować. Poza tym nie widzę ciała programu głównego,sterującego wykonaniem kolejnych procedur.Chyba,że źle widzę.
Turbo Pascala to lepiej sobie odpuścić w zastosowaniach internetowych. Za dużo roboty by było :( Jeśli już - musisz po prostu napisać klienta FTP. W przypadku Delphi czy Free Pascala najlepiej będzie skorzystać z gotowców Indy.
Zamiast szukać "auto" szukaj "auto ".
Nie wszystko działa jak należy ale masz punkt zaczepienia. PROGRAM magazyn; uses dos, crt; VAR nr: string; produkt: string; dostawca: string; data: string; nrfvat: string; pop: Integer; plik1: text; Sciezka: String; PROCEDURE Pauza; begin writeln; write ('Wcisnij <Enter>'); Readln; writeln; end; PROCEDURE...
No to wiemy wszystko. Normalnie, Windows 7 nie pozwala na zapisywanie plików w katalogu "Program Files" na dysku C. Przenieś Katalog TP na inny dysk, lub do katalogu swojego profilu : C:\USERS\twoja_nazwa_użytkownika. Możesz także w konfiguracji TP zmienić katalog docelowy kompilacji (menu Options/Directories), na taki który nie będzie kolidował z systemem...
Dzień dobry Od lat programuję w różnych odmianach Pascala, przede wszystkim na potrzeby aplikacji desktopowych. Od czasu, kiedy zainteresowałem się mikrokontrolerami AVR, szukałem dobrego darmowego kompilatora i edytora dla tego języka, obsługującego AVR-y. Okazało się, że znany mi kompilator Free Pascal oraz Lazarus jako środowisko to potrafią, ale...
Pytanie czy ten "kernel" ma dzialac w trybie rzeczywistym czy chronionym ? Jesli w chronionym to bedzie to wymagalo od ciebie poustawiania wszystkich struktur od obslugi pamieci (tablice stron,segmenty) i odpowiednie zainicjalizowanie procesora. Programy skompilowane w Pascalu sa skompilowane tak aby dzialac w trybie chronionym pod opieka systemu operacyjnego,...
Po pierwsze, to z tego co zrozumiałem, to potrzebujesz kod źródłowy, a nie plik wykonywalny, tak? Bo jeżeli tak, to jest to post w stylu: Napiszcie mi taki program, bo ja sam nie umiem. Pozatym nie wiem czy dobrze zrozumiałem problem... Potrzebujesz program, który uporządkuje zbiór liczb, np rosnąco bądź malejąco? Napisz dokładniej, o co chodzi w tym...
Zapisać do pliku o rozszerzeniu "BAT". Uczysz się programować w Pascalu, czy obsługi TP 7.0 przy wyłączonym monitorze ? IDE i Skróty FP są właściwie identyczne, poza tym nauka samych skrótów klawiaturowych jest bez sensu - uczysz się ich w trakcie korzystania z programu, po to aby ułatwiały pracę, nie po to by móc je wyrecytować ;) Pozdrawiam, Krzysztof.
spróbuj stworzyć projekt na nowo. Jeśli masz złożoną formę, możesz stworzyć nowy projekt, zapisać go, zamknąć Buildera, skopiować zawartość pliku odpowiedzialnego za układ elementów na formie, skopiować kod. Nie kopiuj jednak niczego ponadto. Otwórz ten nowy projekt - powinieneś mieć widoczna formę i cały kod. Spróbuj skompilować. Jeśli nie przyniesie...
Tak, nie będzie żadnego problemu. Dev kompiluje jakby w free pascalu. Dev ma taką przewagę nad FP, TP i BP, że pokazuje Ci dokładnie gdzie masz błąd i jaki to błąd. Przy tworzeniu projektu ustawiasz CONSOLE APP, potem wrzucasz ikonkę w projekt i zapisujesz plik, po kompilacji dostajesz plik *.PAS i tego pliku wymaga nauczyciel. Resztę taką jak projekt...
Fogra 98 nie pójdzie pod Win2000. Możesz nie próbować. Dobrze chodzi natomiast następna wersja t.zn. Fogra 99 wydana m.in. przez Optimus Pascal Multimedia. Dołączona była do którejś z gazet. Zawartość ta sama, trochę inna kolorystyka a działa pod Win 9x i 2000. Przy ręcznej zmianie w pliku mep.ini działa z dysku - bez płyty. http://www.dzieci.org.pl/prog.php
2. function declaration isn't a prototype - już wiem o co chodziło. W definicji miałem np: init_uart() a powinno być init_uart(void). Czy funkcja bezparametrowa na pewno wymaga void'a? Z tego co mi się zdaje to nie.. (A co do różnicy w pliku nagłówkowym a pliku .c to różnicy tej mieć nie moge bo w WinAVR nie pisze się pliku .h osobno. nie wiem jak...
Najpierw musisz mieć ten plik z danymi. W tym celu tworzysz więc program, który zapisze twoją tablicę rekordów z danymi osób (co to rekord mam nadzieję wiesz) do pliku binarnego. Następny program korzysta z takiej samej tablicy rekordów i i wczytuje plik binarny do tej tablicy. Potem iteracja (przejście kolejno) po elementach tablicy (rekordach) i obliczenie...
uses windows,crt; var m:char; plik:text; begin assign(plik,'c:\text.txt'); rewrite(plik); repeat m:=readkey; if m=#9 then write(plik,'---------------------'&#... write(plik,m); until m=#13; close(plik); end. Jak zrobić aby ten program działał również po zminimalizowaniu?
Imie: John Nazwisko: Kiepski Tel: 111222333 to musisz napisac program zapisujący tablicę lub rekord do pliku. Pozdrawiam. to musiałbym przerobić aktualny program czy napisać nowy który by zapisał tablice do pliku?
do usuniecia
Dziękuje wszystkim za pomoc!
Spróbuj tak : program zapisywanie_danych; var plik:file of string; txt,nazwa:string; begin writeln('Tresc:'); read(txt); writeln('Nazwa:'); read(nazwa); assign(plik,nazwa); {$I-} rewrite(plik); {$I+} write(plik,txt); close(plik); readln; end.
Ściągałam już wiele takich plików tylko za każdym razem po zainstalowaniu nie mogłam znaleźć fpc.exe i w tym momencie jest tak samo.
Jakiej pomocy oczekujesz? Tu nikt za Ciebie programu nie napisze, choć zawsze możesz liczyć na pomoc w rozwiązaniu konkretnego problemu. Na przykład: - jak stworzyć monit o podanie nazwy pliku - jak otworzyć i móc odczytać dane z pliku tekstowego - jakiej metody użyć, aby program wyszukiwał tekst niezależnie od wielkości liter. Potrzebna jest minimalna...
Nie moge poradzić sobie ze zrobieniem programu ,Licze na wsza pomoc. zad Dany jest plik dane.dat a w nim ciag liczbowy . W zalozeniu tego ciagu liczby powinny byc na przemian parzyste i nieparzyste. a)napisac procedure sprawdzające czy liczby sa ulozone na przemian b) napisac procedure ktora przepisze z pliku liczby nieparzyste do tablicy a i zad 2...
Rozwiązanie: Musisz skopiować plik egavga.bgi, tak aby był w jednym folderze razem z plikiem exe, wtedy ruszy. Znajdziesz go razem z dyskietkami instalacyjnymi TP. Mój komentarz: Na twoim miejscu zastanowiłbym się nad jakimś alternatywnym rozwiązaniem. BGI to interfejs przestarzały, to było dobre 20 lat temu. Zdarzają się problemy pod Windowsem.
(at)ElektrodaBot Pokaż prosty przykład we FreePascalu jak używać CreateFile/ReadFile/WriteFile do obsługi portu COM pod Windows. Bezpośrednia odpowiedź Poniżej masz minimalny, samowystarczalny przykład w Free Pascalu (Windows), który otwiera port COM przez CreateFile, konfiguruje go przez DCB/SetCommState i COMMTIMEOUTS/SetCommTimeouts, po czym wysyła...
A to nie jest tak że ta biblioteka jest uniwersalna Biblioteka może i jest "uniwersalna", ale z jej kodu źródłowego to nie wynika, a przynajmniej nie z pliku defs.h: Dodano po 2 Swoją drogą to ARM by się przydał, większy "kop" to jedno, lepszy ADC to drugie. Wystarczyłby ESP8266 ;) W końcu to nie jest tak naprawdę analizator widma, ale prosta wizualizacja.
To nie możesz po prostu złączyć "c:\"+np ?? Dodano po 53 PS. To nie jest "nie wiadomo gdzie" tylko w katalogu roboczym (jeśli nie podajesz ścieżki)
Tak. A następnie instrukcją Seek (lub SeekToEof jeśli dobrze pamiętam) przejść na koniec pliku i wykonać zapis. W ten sposób dołączysz tak, jakbyś otworzyć plik w trybie Append.
write(plik, 'ciąg')
Generalnie wszystkie języki programowania są pod wieloma względami identyczne. Oj, chyba Kolega niewiele języków poznał, i akurat wszystkie były podobne... próbował Kolega Lisp-a (albo elisp-a)? :arrow: miszcz310 "Mi się wydaje, że trzeba powiedzieć język programowania != programowanie." - racja "zacząłbym of Pythona i do tego jakiś dobry kurs/książka...
Temat możesz zamknąć sam, przyciskiem "rozwiązano". Nawet dostaniesz za to punkty. Jeżeli Turbo Pascal nie jest wymogiem odgórnym, to polecam http://www.lazarus.freepascal.org/, powinien działać bez problemu.
Strasznie skomplikowany ten twój program. Trudno się połapać o co chodzi. Kompletnie bez sensu używasz tablicy do zapamiętania kolejnych znaków czytanych z pliku. program pliki_TXT; uses dos,crt; const opusc = [#9,#32,#3,#2,#13,#10,#45,#31,#95 ... var SRC : SearchRec; ile : integer; {**********************************...
Racja :/ Nie pomyślałem o tym. No to pozostaje Ci taki zapis : [syntax=delphi]unit wczytywaniepliku; interface uses Classes, SysUtils; procedure plikOtwierany(var plik : text); implementation //--------------------------------------... procedure plikOtwierany(var plik : text); var nazwaPliku:string; begin Writeln('Podaj nazwę pliku wraz...
Ta odpowiedź jest bardzo niestaranna. Brakuje zamknięcia pliku Może, ale raczej niepełna... miała być wskazówką czego szukać a nie bezbłędnym rozwiązaniem problemu. Kolega Kuba dopiero uczy się programować i jeśli sam nie nauczy się szybko szukać potrzebnych informacji w dokumentacjach, helpach, Internecie,... to będzie miał problem z samodzielnym...
Poszukaj sobie opisu formatu JPEG i tam będzie rozpisane co gdzie jest. Utworzysz sobie odpowiedni typ danych i wczytasz do nich nagłówek, a potem to już z górki. Można byłoby znaleźć jakąś gotową biblotekę ale pewnie nie o to chodziło nauczycielowi.
Tak na początek to widzę w tym kodzie możliwość stworzenia dwóch procedur: - odczyt z pliku - zapis do pliku
kiedy pascal dochodzi do miejsca gdzie jest koniec liczb to zwraca zera za każde puste pole, ale kiedy zaro będzie wpisane jako liczba w pliku to już nie posortuję. Napisałem prog co sortuje liczby w pliku ale w tych liczbach nie może być zera, jak to zrobić aby prog brał pod uwagę zero? Ten kod źródłowy niestety nic mi nie mówi, ale jeszcze go poanalizuję....
Procedura w takiej formie : {procedura wyszukiwania filmu wedlug zadanego klucza} procedure wyszukaj; var p : file of film; f : film; s : string; x : integer; begin write('podaj tytul filmu ktory chcesz znalezc : '); readln(s); assign(p,'filmy.dat'); {otwieramy plik} reset(p); {reset...
Z grafiki w TP dużo mi sie juz zapomniało (z resztą wogóle mnie to nie interesowało), ale wydaje mi się, że to tego jest funkcja GetPixel - w przeciwieństwie do PutPixel, która ustawia wybraną berwę punktu.
Nie wiem dokładnie, ale jeżeli używasz Free Pascal-a, to na 100% masz tam jakieś opcje kompilatora, w których możesz ustawić target. Free Pascal Compiler version 2.2.0 Dodano po 13 Tu znajduje się opcja Target dla kompilatora, w IDE Free Pascal-a http://obrazki.elektroda.net/57_12709780... Ma być ustawiona w ten sposób : http://obrazki.elektroda.net/66_12709780...
Zapewne chodzi o różnice w 'alignment' tj wyrównywaniu do okrągłej wartości adresów elementów rekordu/struktury. Kompilator Pascal-a i C może różnie to realizować. Zamieść przykładowe zapisy pliku z Pascal-a i C do porównania.
Witam serdecznie, Mam taki problem. Mianowicie muszę (na sobotę) napisać program (baza danych) samochodów i klientów, która ma działać jak wypożyczalnia, tzn. Możliwość wypożyczenia auta na określony czas lub ilość km. Ja napisać chciałem to w sposób taki że najpierw tworzę plik z autami, potem z klientami, i kolejno po wybraniu klienta i auta przenoszę...
Łuk_F to niestety nie to dalej jest ten błąd Plik ma teraz skladnie : (at)ECHO OFF CLS ECHO _ ECHO _ ECHO [ 1 ]. Norton Commander ECHO [ 2 ]. Turbo Pascal ECHO [ 3 ]. Windows ECHO [ Q ]. Zakończ ECHO _ ECHO _ CHOICE /c:123Q /t:Q,10 Dokonaj wyboru IF ERRORLEVEL 4 GOTO Koniec IF ERRORLEVEL 3 GOTO Windows IF ERRORLEVEL 2 GOTO Pascal
Drugi program najpierw każe wczytać ciąg, a później szuka wskazanego słowa. Mi chodzi oto aby ten ciąg był wczytywany z pliku tekstowego.
witam Program prawie_gotowy; Uses CRT; Const haslo='D...'; Var wprowadz:String; petla:byte; imie,nazwisko,telefon: array [1..30] of string; c,c2,c3:char; iloscosob:byte; t1:byte; plik:text; PROCEDURE Zapisz; Begin Assign (plik,'BAZA.DAN'); Rewrite(plik); Writeln(plik,iloscosob); t1:=0;...
Plik TPU to plik z postacią skompilowaną pliku PAS tworzony przez kompilator Turbo Pascal (tylko) na etapie kompilacji. To właśnie ten plik jest de facto wykorzystywany do budowania pliku exe. Teoretycznie oznacza to, że można komuś dostarczyć właśnie taki plik do wykorzystania, nie ukazując mu kodów.
A czy ten plik tekstowy leży w tym samym katalogu co EXE, a katalog roboczy nie jest wymuszony inny, niż docelowy dla pliku EXE?
wychodzi na to, żę tak (chyba, że jestem ślepy) Słabo znam Free Pascal-a, ale czy nazwa programu (po słowie program .... ;) nie powinna być taka sama jak nazwa pliku w którym kod zapisujesz?
Albo to powinno być jako pierwsze po begin: initgraph(a,b,' '); Albo nie masz lub masz zle ustawioną scieżkę do pliku obsługującego grafikę.
Poszukuję pliku pomocy do Free Pascala 2.6 lub wcześniejszych, który moznaby podpjąć pod opcje Menu-Help, index, topic itd.. Szukałam na stronie http://www.freepascal.org/docs/docs.html do której odsyłają mnie w FPC, ale jakoś nie ma tej strony, a na innych nie mogę znaleźć takich plików. Mam TP7 ale plik turbo.tph raczej nie bedzie współpracował z...
Mały błąd się wkradł w program...mianowicie kawałek kodu był w nawiasach...wersja skompilowana w Turbo Pascalu do pliku pwm.exe w załączniku. Ps: Kompilacja do pliku exe w Turbo Pascalu COMPILE -> BUILD
pascal odczyt pliku posektorowa pliku pliku pascal pętla
modecom bezpiecznik wzmacniacz dzwiek laptop gotowanie płynu chłodniczego
przewód indukcji uszkodzony watson odtwarzacz
Co to jest k164ŁA8? Wyjaśnienie kodu HTML i układu scalonego Somfy Gemini 25/16 - Jaki kondensator wybrać?
