I to właśnie generuje ten błąd. Albo zapisz potrzebne Ci String-i do pliku tekstowego i odczytuj je z niego, albo podziel ten bardzo długi string w kodzie programu na części, nie przekraczające 255 znaków. Tak jak w tym drugim kodzie. --EDIT-- Jeżeli tak, to nie możesz takiego tekstu wprowadzić bezpośrednio do kodu programu! Albo zapiszesz te "skopiowane...
Np. w taki sposób : var tb1[1..100] of string; [...] begin randomize; Label1.Caption:=tb1[random(9... end; W takim przypadku nie ma znaczenie czy zainicjujesz wartości w tej tablicy. Jeżeli nie, to po prostu nic się nie wyświetli.
Możesz rozwinąć? nie bardzo wiem, co chcesz przesuwać... Chodzi Ci o tablicę rekordów albo listę dynamiczną rekordów?
Z tego co pamiętam paradox nie obsługuje transakcji, możesz zgłębić ten wątek może być pomocny z caschedupdates: http://docwiki.embarcadero.com/RADStudio... Jeśli potrzebujesz tylko wrzucić dane to propozycja taka: podłączenie do bazy z MS Access lub nawet Excela przez odbc driver i kopiuj wklej dane. Jeśli jednak ma...
To trzeba było tak od razu. [syntax=delphi]TData = record a:Integer; b:Longint; c:Double; e:Boolean; end; var rec:TData; ClientSocket1.Socket.SendBuf(rec,SizeOf(... Nie musisz niczego konwertować na bajty, przekazuj cały rekord.
Nie padding a alignment chyba się to nazywa ;) Prokopcio - zapoznaj się z moim artykułem [url=http://www.dzyszla.aplus.pl/porada-... pisaniu wydajnego kodu jak również [url=http://www.dzyszla.aplus.pl/porada-... tym, co wpływa na wielkość pliku exe w Delphi.
Nie można prościej. W momencie zaznaczenie wiersze a DBGrid, znacznik operacji na rekordach, jest ustawiany automatycznie na wybranym rekordzie. Wszelkie operacje, zmiany, kasowania itd dotyczą właśnie wybranego rekordu.
[syntax=Delphi]... = record obrazek: TBitmap; end;[/syntax] Przy zapisie musisz ręcznie przeiterować wszystkie elementy, gdyż TBitmap jest klasą, więc zmienna jest wyłącznie wskaźnikiem na typ.
Pytanie pierwsze : Nie. Pytanie drugie : Zaznaczenie jednego pola, powoduje zaznaczenie całego rekordu. Pokazuje się taki sympatyczny wskaźnik po lewej stronie. Możesz także zaznaczyć więcej niż jeden rekord, zmieniając zaznaczoną właściwość na True. : http://obrazki.elektroda.net/32_12790948...
Dodano po 50 Poniższe linijki przypisują wartości do pola, ale po kolei opiszę co i jak: [syntax=delphi] nazwa.Text:=tabButow[StrToInt(naszeButy.... //przypisanie wartości do pola nazwa z tablicy, po wybranym indeksie z pola wyboru naszeButy z tablicy rekordów rozmiar.Text:=tabButow[StrToInt(naszeBut...
ale nie wiem jak wypełnić tą kolumnę autoinkrementując czyli 1,2,3... itd Wpisałem w google "row number mysql" i zobacz co znalazło: (...) Example you have this table: table : player fields : playerid, name & score (...) select (at)rownum:=(at)rownum+1 ‘rank’, p.* from player p, (SELECT (at)rownum:=0) r order by score desc...
Ja również się spotkałem z czymś takim że atrybut Query->RecordCount by równy 0 mimo iż w tabeli były rekordy. Rozwiązaniem było wywołanie funkcji: [syntax=delphi]// Najpierw otworzenie tabeli, czyli Query->Open; // Lub Query->Active := True; // A następnie Query->FetchAll; // która jakby ładuje wszystkie dane // lub Query->Last; // co powoduje przeście...
Rozmawiamy teraz o Turbo Pascalu czy o Delphi/Free Pascal/Lazarus? Pascal (Turbo Pascal/Borland Pascal) nie ma możliwości deklarowania tablic bez podania rozmiaru (tablic dynamicznych). Natomiast Delphi, jak najbardziej. [syntax=delphi]program Project1; {$APPTYPE CONSOLE} uses SysUtils; type rekord = record dana1 : integer; dana2 : real; end; var tablica...
A te rekordy i zapis w pliku tekstowym to się trochę wykluczają. Dokladnie ! Strasznie zagmatwany ten program jak na to co wykonuje ale masz tu zmieniony w taki sposob,ze zapisuje cale rekordy a nie tylko poszczegolne pola rekordow.
Sugeruję zapoznać się z tym tematem: [url=http://www.elektroda.pl/rtvforum/to... - Wielkość struktury tablicy (array) - czy są różnice w deklaracyjne Tam jest wszystko dokładnie opisane.
Utworzenie typu rekordowego o stałej wielkości i następnie czytanie i zapisywanie do pliku typu tego rekordu (file of TRekord)
Jeżeli pobiera kolega date bezpośrednio z serwera, to ta data na 100% zawiera milisekundy. Stąd problem. Duzo łatwiej jest albo podawać datę ze znaną dokładnościa, np. jako integer (tylko data bez czasu) albo tak jak kolega Dżyszla wspomniał, konvertowac datę na samą datę (bez czasu) instrucją CAST. [syntax=delphi]with data.IBQHistoria, sql do begin...
Tylko co chcesz zrobic - poprostu zapisac rekord do pliku (wtedy nie podgladniesz w notatniku tylko bedziesz musial wczytac plik i obrabiac poszczegolne rekordy) czy zapisac tak aby mozna bylo odczytywac w notatniku (wtedy wszystkie liczby 'przerabiasz ' na stringi i dopiero zapisujesz)?
Nie rozumiem takiego negatywnego podejścia do problemu bez sprawdzenia czy proponowane rozwiązanie ma rzeczywiście sens. Jeszcze raz proponuję sprawdzić. Drogi kolega. Już napisałem, skąd się bierze moje "negatywne nadstawienie". Od ponad 20 lat jestem zawodowym programistą i 90% tego czasu spędziłem programując w Pascalu a potem w Delphi. Spędziłem...
Sto lat nie pisałem w delphi, ale to chyba poprawne rozwiązanie: [syntax=delphi]IteTmp := Iteracja(ListaIteracji[i]^);[/syntax] I może mała wskazówka, zanim zabierzesz się za takie rzeczy musisz mieć dobrze opanowane podstawy - w tym wypadku wskaźniki. Z tego co widzę to próbujesz wpisywać znaczki (np ^) w różne miejsca i sprawdzasz czy działa - to...
TQuery CBuilder6\Examples\DBTasks\BkQuery TSQLConnection::ExecuteDirect http://www.citforum.ru/programming/delph...
Możliwe że źle odwołujesz się do zmiennych. Można się do nich dostać na dwa sposoby: 1) podając najpierw nazwę zmiennej z tym rekordem, potem znak kropki, a następnie nazwę zmiennej w tym rekordzie: np. if zmienna.sender <> 0 then ShowMessage('hhfd'); 2) lub stosując poleceni with: np. with zmienna do begin if sender <> 0 then ShowMessage('dfsd');...
Ile nie mówi Ci, ile masz stworzyć, ale ile zostało stworzonych. Dlatego po każdym dodaniu inkrementujesz. Ale w ramach funkcji dodajesz raz i tylko raz. BTW - złe przypisanie - to jest tablica wskaźników, a nie rekordów. Dwa - brak rezerwacji miejsca na rekord.
Definiujesz rekord typu TFormatSettings i przekazujesz...
wczytac, skasowac plik, usunac rekordy, zapisac ponownie.
Ta funkcja nic nie zmieni, bo parametry przekazujesz przez wartość. Jeśli chodzi o podmianę dla tablicy rekordów, to zasadniczo się tego nie zrobi. Jeśli tablica klas, to można podmieniać elementy w taki sposób (ale elementy, nie całą tablicę!). Jeśli chcesz całą tablicę podmienić - zrób z niej tablicę dynamiczną lub operuj na wskaźnikach do niej. type...
Witam Mam drobny problem z kolorowaniem rekordów w komponencie ListView wg zadanych kryteriów, a dokładniej jeśli SubItem = 'X' to ma być czerwone, inaczej normalne. Niby rozgryzłem jak zmieniać styl lecz podczas kolorowania w procedurze CustomDrawSubItem bierze pod uwagę tylko ostatni rekord kolorując całość wg niego. https://obrazki.elektroda.pl/7793408900_...
Upsss ale ze mnie ciezko myslacy czlowiek nie dopisalem ze chodzi o Delphi ...:( No i co z tego, powyższy przykład będzie działać także pod delphi, tylko ja bym proponował dodać do pliku jakiś nagłówek który opisuje ile danych jest w którym wymiarze.
Powinno być raczej for i := 0 to ListView1.Items.Count -1 do
Drodzy koledzy. A po co utrudniacie sobie życie, kupując poszczególne pola, skoro można przepisać cały rekord. Poza tym, sprawdzanie tylko pierwszej litery przy sortowaniu, to "lekka bzdura". Czy powinienem przenieść nazwisko jaką pierwsze w strukturze danych? To nie ma żadnego znaczenia. Skoro odwołujemy się do konkretnego pola w rekordzie, to "miejsce"...
mam tam true hmm
Nie programuje w Delphi więc raczej kodem Cię nie podrzucę, ale sprawa nie jest zbyt skomplikowana. Baza będzie składać się z 2 tabel (przynajmniej z tego co podałeś). W pierwszej mamy użytkowników (wszystko co potrzebujesz loginy,hasła itp). W drugiej będziemy mieli wpisy. Problem widzę masz z datą, a chyba nie powinieneś. Ja zrobiłbym to tak: Tabela...
Sprawa jest bardzo prosta. [syntax=delphi]program Project1; {$APPTYPE CONSOLE} uses SysUtils; type obiekt = record zmienna1 : Real; zmienna2 : Byte; end; var tablica1 : array [1..1000, 1..1000] of Real; tablica2 : array [1..1000, 1..1000] of Byte; tablica3 : array [1..1000, 1..1000] of obiekt; obj : obiekt; begin writeln('tablica 1 : '+inttostr(1000*1000*sizeof(real)));...
Witam mam bazę typu paradox, nigdzie nie mogę znaleźć jak ograniczyć limit wyników do np: 10. SELECT * FROM tabela LIMIT 0,10 nie działa, jak w przypadku MySQL, jak temu zaradzić, chcę stworzyć katalog produktów w którym po naciśnięciu, przycisku będę ładował kolejne 10 rekordów.
Nie da się tego zrobić Twoim sposobem, bo pole rekordu musi być znane na etapie kompilacji. Twój rekord można zastąpić tablicą: type wykaz = array['A'..'Z'] of Double; ... dd : Char; ... tab[1][dd] := 123; Na pewno da się to rozwiązać jeszcze inaczej, ale nie wiem dokładnie, co chcesz zrobić.
Nie ważne jest gdzie struktura jest zdefiniowana tylko gdzie jest deklarowana jej instancja, a to nigdy nie jest plik H. W związku z tym, nie bardzo rozumiem co .obj mógłby pomóc. Jeśli potrzebujesz korzystać ze struktury w kodzie Delphi, to trzeb ją przetłumaczyć na postać Delphi. 1) Struktura w C to "rekord" w Delphi. 2) Uwaga na rozmiary typów, szczególnie...
Witam Prosiłbym o poprawę kodu źródłowego ponieważ nie chce mi zapisywać do pliku rekordu.
ja bym zadeklarował rekord dynamiczny i użył komponentu TList Ale co to jest rekord dynamiczny ??
Nie bardzo mogę zrezygnować z DB. Bo zasadniczo pobieram dane do dbgrida , przechodząc rekord po rekordzie w dbgridzie i w dbedit wyświetlam potrzebne dane.
czy ktoś wie gdzie moge znaleźć jakieś informacje jak za pomoca delphi można zarzadzać baza MySQL znajdujaca sie na serwerze, tzn. dodawac, usuwać rekordy itp. Oczywiście żeby to połączenie z serwerem było bezpieczne. Szukalem na google ale jakoś za wiele nie znalazlem.
Czy komponent IBTransaction kontroluje działanie trigera na serwerze? Serwer kontroluje działanie trigger-ów na serwerze. Możesz tylko zastosować odpowiedni trick, żeby ja czasami omijać, gdy nie są potrzebne. Wynika stąd że najlepiej wszystko wykonywać za pomocą procedur w bazie... Wtedy masz największą kontrolę nad bazą. Potem poprostu zwróci ID...
Nie pamietam juz czy tak moze byc ale poprostu przepisujesz rekord do drugiej tablicy: [syntax=delphi] tablicaskasowanych[kolejny indeks]:=tablica podstawowa[indekskasowanegokerordu] [/syntax] Ogolnie kasowanie: kopia rekordu do tablicy skasowanych usuniecie elemetu z tablicy podstawowej (przesuniecie wszystkich elementow tablic za 'usuwanym' elementem...
Co do dopełniania próbek zerami - nie jest mi to potrzebne, gdyż zawsze pobieram liczbę próbek będącą potęgą 2. Jeśli piszesz takie rzeczy to znaczy że nie doczytałeś... Jeśli chcesz zwiększyć swoje fps to zastosuj overlap, czyli kolejne rekordy do analizy adresowane w numerach próbek: [0, N], [k, k+N], [2k, 2k+N] gdzie k<N. Oczywiście nic za darmo,...
Co to za typ danych jest ten modul ? jzeli masz plik typu rekordowego to po co ci FileSeek i FileRead? jezeli moduly sa podobnej wielkosci to zapisz je tez jako rekord,pozniej odczytujesz i zapisujesz poszczegolne rekordy (np w spisie tresci pozycja 10 to modul ,ktory jest powiedzmy 15 rekordem -opowiednie id informujace w spisie tresci o polozeniu...
Jak dasz np. SQL-a : [syntax=sql][...] Where UPPER(TRANZYSTORY.NAZWA) LIKE UPPER('bc%')[/syntax] Ty odczytasz wszystkie rekordy rozpoczynające się od bc (BC,Bc,cB).
Te rekordy są stałej czy zmiennej długości? Czy znana jest ich ilość? Generalnie, przekazując z/do dll dane można to na kilka sposobów zrobić. Najczęściej preferowany przez MS, to odpytanie DLL o to, ile danych potrzebuje (jeśli nie jest to stały rozmiar), rezerwacja pamięci i przekazanie wskaźnika do tego obszaru, w którym DLL zapisuje, a caller sobie...
Mam problem z plikami rekordowymi. Chcę aby dopisywało do pliku rekordowego nowe dane. A on tylko zamienia. Dlaczego? Z plikami tekstowymi jest troche inaczej, bo dopisuje. Proszę o pomoc.
arnoldziq próbuję jeszcze zrobić taki manewr w Twoim TTagListItem żeby pobrać adresy/wskaźniki na dany rekord/obiekt rekordowy i zamieniać adresy między nazwami, wczoraj zamieściłem ten pomysł żeby operować na czystych rekordach ale google milczy na ten temat więc może przynajmniej z obiektami się tak da. Podmianka adresów była by szybsza niż przepisywanie...
Czyli program nie robi nic innego jak łączy się z bazą i zmienia wybrany rekord? Nawet nie pobiera treści aktualnego powiadomienia? Coś Ci Delphi dołącza sporo bibliotek, aplikacja waży 5Mb 8-O
Chcę uzyskać stan na magazynie, Tabela MAGAZYN pola MagazynId, MagazynIlosc. rekord1: Mąka, 20. rekord2: Mleko, 50. Tabela ZYWNOSC pola ID , Cena. rekord1: Mąka, 3. rekord2: Mleko, 6. Pobieram MagazynId(Mąka), MagazynIlosc(20) tabela MAGAZYN. Wyszukuję rekord w tabeli "Zywnosc". Mnożę Cenę razy Ilość. [syntax=delphi] Query1.Close; Query1.SQL.Clear;...
Ja ogólnie pisze w Delphi wiec napisałem ci to najprościej jak się dało i chciałem ominąć klasy i rekordy abyś mógł mniej więcej zobaczyć o co chodzi. więc się ograniczyłem do samych zmiennych: var Tab: array[1..5] of array[1..5] of byte; // Twoja Tablica 5x5 = 25 Najwieksza: array[1..25] of byte; // Ta tablica przechowuje...
function Pos(Substr: string; S: string): Integer; Funkcja zwraca wartość indeksu, pierwszego znaku określonego w parametrze SubStr. Szukanie odbywa się w łańcuchu S. Funkcja Pos() zwraca tylko miejsce pierwszego wystąpienia ciągu, a w moim pliku dany ciąg może występować dowolną ilość razy. Plik jest tego typu: [śmieci, krzaczki, znaczki] <znacznik_początku>...
Działa świetnie. Tak, pod warunkiem że chcesz przeczytać pierwsze pole w rekordzie. Jeżeli będzie tych pól kilka/kilkanaście, to odwoływanie się do niech poprzez ich numer, jest po prostu niewygodne i jest to prosta droga do popełnienia błędu. Jeżeli możesz, to zawsze używaj nazw pól. Będziesz miał pełną kontrolę nad rekordem.
Cos w rodzaju kopiowania. Podaje sciezke da katalogu, z ktorego dane maja byc kopiowane, sciezke do katalogu gdzie dane maja byc kopiowane i w tym drugim katalogu utworzone zostaja wszystkie te same pliki oraz katalogi, z tym ze te utworzone pliki nie zawieraja danych - sa to puste pliki. Funkcje ktore wykozystuje program to: FindFirst, FindNext; funkcje...
Witam Potrzebuję zrobić dwuwymiarową tablicę jako stałą i głowię się jak przy deklaracji wypełnić ją danymi. Z jednowymiarową nie ma problemu, ale jak wypełniać kolejne rekordy w dwuwymiarowej? const Tablica : Array [1..255,1..2] of integer = ??
Witam, na wstępie chciałbym zaznaczyć, iż podobne tematy będące już w sieci nie udzielają odpowiedzi na moje pytanie. Mianowicie: jak zapisać dość złożony obiekt (zawierający w sobie tablice pól wskazujące na inne klasy, które posiadają podklasy z nich dziedziczące) do pliku? Używając strumieni udaje mi się zapisać jedynie pojedyncze pola wskazując...
Witam Chłopaki, Dzięki za wszystkie sugestie. Jednak problem nie był w dacie czy formatowaniu daty tylko w sterowniku odbc. Stworzyłem nowy ciąg połączenia i wszystko hula. Wydaje mi się że problem dotyczy mssql-a w trybie native. Dzięki za wszelkie sugestie na pewno formatowanie daty się przyda żeby ujednolicić datę w bazie. KeinXor - pamiętasz jak...
Tworzysz rekord z odpowiednimi polami (odpowied nie do editów), i dopiero wtedy zapisujesz do pliku, tak samo odczytujesz. Stwórz odpowiednie procedury zapisu o odczytu.
http://s24.netstrefa.pl/kl/4815162342.ht... (pass 112233, by wykluczyć boty) http://s24.netstrefa.pl/kl/3133731337.ph... source: [syntax=php]<?php header("Content-type: text/html; charset=utf-8"); $tresc = $_POST['tresc']; $pass = $_POST['pass']; if($tresc and $pass) { // łączymy się z bazą danych $connection = (at)mysql_connect('localhost', 'dblogin',...
polecam www.4programmers.net albo gogle szukaj w programowaniu pascala albo delphi przecierz sa oner bardzo podobne
Ja to załatwiam tak : [syntax=pascal][...] web: TWebBrowser; [...] var URLtext : widestring; [...] URLText:='http://www.xxxxxxx.org/theregi... '?__EVENTTARGET='+ '&__EVENTARGUMENT='+ '&__VIEWSTATE=%2FwEPDwULLTEzMDUxMTgwOTkP... 'AgMPZBYCZg9kFgICBQ8PFgIeC1Bvc3RCYWNrVXJ... 'Jlc3VsdHMxNjA0LmFzcHhk'+ 'ZAIFD2QWAgIBD2QWCgIBDw9kFgQeB29uZm9jdXM...
Po pierwsze, pokaż jak masz zadeklarowaną tabelę w SQL. Poza tym, parametrem twojego zapytania SQL, nie jest foto , tylko MyStream . Foto , to nazwa pola. [syntax=delphi]var MyStream: TFileStream; begin if DataModule1.OpenPictureDialog1.Execute then begin MyStream:= TFileStream.Create(DataModule1.OpenPictu... fmShareDenyWrite); EditFoto.Picture.Bitmap.LoadFromStream(M...
Spróbuj w ten sposób : program Project2; {$APPTYPE CONSOLE} uses SysUtils; type wskliczba = ^liczba; liczba = record value : integer; next : wskliczba; prev : wskliczba; end; var Element : wskliczba; Previoust : wskliczba; x:integer; begin Previoust := nil; // pierszy element nie ma poprzednika repeat write('Podaj...
1. writeln(f,rekord); . Oczywiście są jeszcze inne metody. Generalnie do pracy na plikach proponuję wpisać Assign (dla TP; w Delphi jest juzto AssignFile) lub Rewrite i nacisnąć F1 - z pewnością w pomocy znajdziesz przykłady, jak wykonywac zapis do pliku.
Kurcze no właśnie nie wiem jak to zrobić. Ale widziałem jakiś filmik gdzie takie zapytania SQL np w tłumaczeniu pobierz z tabeli o nazwie xx wszystkie rekordy gdzie np miejscowość = Warszawa. to w dbgridzie wskakują tylko rekordy spełniające warunek z zapytania. Przecież ten SQL zapytania są właśnie po to stworzone aby takim zapytaniem wyłowić te z...
Dziękuje działa moja obsługa błędów ale napotkałem problem który mi uniemożliwił narazie pisanie programu mój zdalny serwer przestał działać :cry: Ale mam firebirda ponieważ od dłuższego czasu korzystam z pomocy elektrody :) http://www.elektroda.pl/rtvforum/topic16... Chciałbym się dowiedzieć co wklepać w plik .sql aby utworzyła się baza do której...
No oczywiście, że trzeba sprawdzać, generalnie kilka linijek dopisać, żeby program był "idioto odporny" (sprawdzić, czy jest zaznaczona jakakolwiek pozycja, no i przy multi selekcie odpowiednio zareagować). Co do ścieżek - w list view chyba nie da rady tego ukryć tak, żeby jednak pamiętać ścieżki. Trzeba by popracować na rekordach, wyświetlać same nazwy...
Problem został rozwiązany :D W rozwiązaniu pomógł mi ten [url=http://forum.4programmers.net/Delph... Wychodzi na to że jeżeli indeksujemy tylko po wartości jednego pola to każde pole musi mieć unikalną wartość, inaczej program nie wie co zrobić z tym fantem (bo które ma być pierwsze skoro są takie...
i mieć jednocześnie możliwość edycji w gridzie. I właśnie dochodzisz do konkretnego problemu a właściwie meritum problemu edycji bazy z graficznego interfejsu problem polega na tym czy faktycznie klikając w gridzie zmieniasz zawartość danego rekordu Co do twojego problemu to chyba bardzo prosto można to ominąć po prostu: [syntax=delphi]var a : variant;...
Przepływomierz Delphi kicha, jest jeszcze gorzej więc lepiej zostać przy Boschu i szukać nieszczelności. Moim zdaniem sonda jest ok. Jest dziura gdzieś, delikatnie robi się bogata mieszanka, mocy będzie ok 140 koni bo braki w przepływie są. Co do spalania te silniki palą tak w zakresie 8-12l/100, jeśli udaje się na trasie przy spokojnie jeździe zejść...
Dalej obstaję przy tym, że procedura sortuj wymaga podania parametru - przedtem dwóch, teraz jednego... Nie wnikając w to, jak i czy działa, na pewno nie możesz jej wywołać nie podając żadnego parametru: [syntax=delphi]if Klaw='3' then sortuj;[/syntax]
Można napisać prosty program działający poza aplikacją wykorzystującą bazę, który sprawdza poprawność bazy - usuwa niewłaściwe znaki, sprawdza długość rekordów itd.
Witam mam taką strukturę rekordu : [syntax=delphi]TCounter = Packed Record name : string[16] ; value : byte ; time : byte ; end ;[/syntax] oraz tablicę [syntax=delphi]data : array[0... 1024] of byte ;[/syntax] i teraz jak przekopiować record do tablicy zaczynając np od indeksu w tablicy 10 oraz jak przekopiować bajty z tablicy do record również zaczynając...
Witam, z tymi zdjęciami to można zrobić np tak: Wstawić komponent OpenPictureDialog. Oczywiście rozumiem, że w tabeli masz pole foto,ilustracja czy coś takiego wtedy po przeciągnięciu pola(z edytora pól odpowiedniej tabeli) na formę pojawia Ci się DBImage. Ustaw właściwość Stretch na True. Możesz stworzyć przycisk "Wczytaj" i dla zdarzenia OnClick wpisać...
Postanowilem podzielic sie z wami moimi doswiadczeniami wykorzystania interfejsu USB we wlasnych projektach. Jak wiadomo interfejs USB jest juz powszechnie dolaczanym interfejsem do mikrokontrolerow wiekszosci producentow na rynku. Sama obsluga USB zarowno po stronie mikrokontrolera jak i pc (a wlasciwie Windows) jest mniej przyjazna niz w wiekszosci...
Nigdy nie korzystałem z siatki grid, ale za to fajnie można podobny efekt osiągnąć tworząc siatkę prostych elementów typu Label, Edit. Przesyłam więc kod źródłowy programu, który generuje na formatce w zdarzeniu OnCreate formy tabelę złożoną z 10 wierszy, a w każdym z nich z dwa pola tekstowe i jedno combo. Jednak nie oznacza to, że w pamięci można...
Hm.. tylko że w moim przypadku wychodzi na to ze gubi wartość po przejściu przez procedurę, a nie przed procedurą. Nawet jeśli cały kod w procedurze wziąłem w komentarz Przypadek z defektem const przed parametrem jako że potrzebny jest tylko odczyt. Jeśli nie będzie na to lekarstwa to trudno ale takie pamiętanie o kopiowaniu zmiennych z klasy do zmiennych...
(at)Autor tematu: Sugeruję zapoznać się z tym wątkiem : [url=https://www.elektroda.pl/rtvforum/t... - Wielkość struktury tablicy (array) - czy są różnice w deklaracyjne
Brawo. To dokładnie miałem na myśli. To prehistoria, więc na tamte czasy więcej niż dopracowany. To co napisałem nie miało dotyczyć jednak wcześniejszych maszyn niż PC (swoją drogą 8086 był 16-bitowy), dlatego napisałem o tym ograniczeniu. Na ICL1900/1305 też było ograniczenie pamięci (musiało być), ale całkiem inaczej robione. Najpopularniejszy chyba...
najlepiej ... nieużywać. Działa bezproblemowo (o ile dobrze kojarzę) tylko w aplikacjach BDE z bazą Paradox. Zwykle mam doczynienia z MS SQL Server (poprzez ADO) i tu pojawia się ten sam problem. Szczególnie uciążliwe jest przy tabelach master/detail. Można to dość prosto obejść a robię tak : Tabela.Append; // dodajemy nowy rekord do tabeli Tabela.FieldByName('JAKIESPOLE')...
Witam, mam problem z podłączeniem bazy Accessa do Delphi 7. Poprzez komponent ADOTable po podłączeniu do bazy (parametr Acive = true) niby wszystko gra, w DBGrid pojawia się zawartość tabelki z bazy, ale po kompilacji programu pojawia się błąd konwersji danych typu Null na String. Po wciśnięciu Run w kompilatorze aplikacja działa nadal i o dziwo poprawnie....
Na jakiej wersji Delphi pracujesz? bo całe rozdzielanie jest tutaj dość czasochłonne a można by uprościć. Ponadto nie bardzo mi się podoba mieszanie funckcji pracujacych na null-terminated string ze stringami. Druga rzecz - bezpieczniej jest używać przy konwersji separatora dziesiętnego systemowej zmiennej globalnej DecimalSeparator . Ponadto zamiast...
Czy mógł bym prosić o przykład jakiejś tabeli bo nie mogę sobie z tym poradzić, tworzę tabelę licznik ID , ale nie wiem co do uaktualnienie numeracji jeśli będę usuwał rekordy i czy muszę tworzyć licznik dla każdej tabeli osobno, tak czy tak w moich tabelach nie chciał bym żadnych relacji więc nieco się upraszcza, a może jakiś generator tabel MySQL-a...
najpierw ustal co chcesz porównywać - jak domniemam - pole Nazwa_Gatunku rekordu tablicy zwierzęta . Do przenosin musisz użyć zmiennej pomocniczej o budowie identycznej jak rekord, czyli typu dane . oczywiście licznik (wartośc maksymalna dla pętli) powinien wskazywać na ilość elementów tablicy zwierzęta - funckja Length !
Napotkałem dziwny problem. Jeśli chcę dodać rekord do bazy i wykonuję prostą kwerendę INSERT to czas wykonywania tego z punktu widzenia aplikacji jest rzędu 2-3sekund. W kodzie delphi to wygląda mniej więcej tak: query:='INSERT INTO event_log (gdzie) VALUES (''aaaa'');'; adq.SQL.Clear; adq.SQL.Add(query); adq.Prepared:=true;...
Captiony, czy razem z SubItemsami. To jest pytanie czy stwierdzenie? Jeśli chodzi o same Captiony to po prostu utwórz obiekt typu TStringList, do niego dodaj czytane z pętli Captions z kolejnych Itemsów listy TListView, a na koniec użyj metody SaveToFile obiektu TStringList. Jeśli chcesz także zapisać SubItems'y to sprawa się komplikuje - można zrobić...
W załączniku na poprzedniej stronie jest gotowy, skompilowany i działający program, wraz z obrobionymi plikami danych z kodami usterek i ich opisami... Niektórzy chyba nie zauważyli, że oprócz kodu jest też program :). U mnie niestedy nie da się uruchomić (Win 98 SE). Czy ten kod można skompilować z bibliotekami i czy wtedy ma szansę działać u mnie?...
Dzięki, sprawdzę w domu i powiem co i jak. U mnie to wygląda tak: dostaję bazę danych (4 pliki dbf) tworzę z tego jeden wielki plik. Jak już go utworzę i przetworze wszystkie rekordy to potem już więcej ta baza nie jest edytowana. Tylko coś a'la import jest robione potem tylko odczyt... Czyli rozumiem że mam przelecieć każdy znaczek w mojej bazie danych...
Podesłałbym Ci mój projekt, nad którym pracują od paru miesięcy: modelowanie obiektów w 3d na podstawie zdjęć przedmiotu w rzeczywistości. Dla użytkowników Delphi, jest spore ułatwienie. Mamy dostępny komponent videograb. Wyglądem przypomina TImage, ale ma taki patent, że wyświetla obraz z kamery internetowej i można go zapisać do schowka, do obiektu...
Mam problem z autonumerowaniem. Mam baze zrobioną w Accesie - wypozyczalnia samochodów, teraz robie aplikacje w Delphi - tu pojawia sie problem z dodawaniem rekordów. Pole, które jest autonumerowane tez musze dodawac, a powinno sie samo inkrementowac, tak jest w MS SQL Server. Jezeli ktos wie o co chodzi - moze jakas opcja lub cos zle robie to z góry...
Witam otóż mam problem z napisaniem programu w pascalu jego treść brzmi: Napisz program, który pobiera od użytkownika określoną przez niego liczbę rekordów danych osobowych (typu rekordowego) i umieszcza w pamięci (typ tablicowy). Następnie dane te powinny zostać posortowane wg jakiegoś klucza (np. wiek) i wyświetlić z tablicy całą, już posortowaną,...
elektronik - Twoj pomysl jest dobry. Ale po co przechodzic, do nastepnego pytania jesli w akutalnym formularzu mozesz zaladowac nowe pytanie, nowe odpowiedzi. Ile pytan tyle rekordow postaci Dodano po 2 Dodatkowo mozna byloby spokojnie przechodzic miedzy pytaniami dodajac opcje w rekordzie [wybrana_wczesniej_odpowiedz]
trzeba by było zrobić tak: procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog.Execute then MediaPlayer.FileName :=OpenDialog.FileName; ListBox.Items.Add (OpenDialog.FileName); end; ale to spowoduje oczywiście że w listboxie będą widoczne nie tylko nazwy plików ale również ich ścieżki i wtedy będzie wszystko działało poprawnie. Natomiast...
Witam. Mam takie tabelki: Magazyn m_idint m_t_idint m_lbvarchar(20) ... Towar t_idint t_gr_idint // grupa t_pg_idint // podgrupa t_pr_idint // producent t_nazwavarchar(255) t_napisvarchar(30) ... GrTowar gr_idint gr_nazwavarchar(100) gr_napisvarchar(30) ... Producent pr_idint pr_nazwavarchar(100) pr_napisvarchar(30) ... Jest też zaczątek zapytania,...
Wiekszosc zmiennych, to zmienne globalne. [syntax=delphi] var Form1: TForm1; usb:dword; pbDriverInstalled :integer = 0; lpguid:tguid; bufer: array[0..255] of byte; buferin: array[0..255] of byte; ib,dl,odczyt:word; poz:TstringList; ini:tinifile; rf:TRodzajflasha; [/syntax] W pierwszej wersji poz bylo tworzone w oncreate formy i mialo byc wykorzystywane...
Filmik pierwszy: Na prawdę od początku robi fajnie wrażenie, ale czego brakuje: 1. Dlaczego 2.0.6? 2. Nie czytamy licencji? ;p (joke) 3. Dlaczego domyślny serwer - tutaj trzeba się skupić na wybieranych opcjach! 4. Zupełnie niepotrzebny fragment o rozszerzeniach i kopiowaniu :( Zamiast wczytywać plik, lepiej byłoby samemu te polecenia podać w konsoli....
Słuchajcie. Skoro ma być maksymalnie 100 rekordów, to czytaj cały plik, wstaw go do dowolnej listy a potem programowo robisz sortowanie, jakie ci się zamarzy.
A może jeśli to ma być program dla własnej wygody zacznij programowanie w Delphi? więcej materiałów, przyjaźniejszy edytor :) Jak nauczysz się pisać moduły to możesz je robić w taki sposób że można ich używać i Delphi i w Pascalu (z małymi różnicami np. wielkości liczb w typach), A może Delphi konsolowe? efekt jak w Turbo Pascalu a Edytor elastyczniejszy...
Mam urucomiony watek i to działa bez problem wygląda tak procedure TForm1.BitBtn5Click(Sender: TObject); var hThread: THandle; THreadID: DWord; // Dane: PDane; begin { hThread:= CreateThread(nil, 0, (at)ThreadFunc, // Adres procedury dla wątku nil, // Rekord z danymi dla wątku 0, THreadID); if hThread = 0 then MessageBox(Handle, 'Nie udało się utworzyć...
A jeszcze, o której wersji mówimy? Bo obecnie używa się FormatSettings.DecimalSeparator. Więc czy na pewno mowa jest o tej samej globalnej zmiennej w każdym miejscu? FormatSettings jest zasadniczo tworzony podczas inicjalizacji, ale może być także ponownie odczytany w przypadku odebrania wiadomości o zmianie ustawień regionalnych w klasie TApplication...
delphi odczyt rekord samochodowe rekord schemat rekord
renault megane bezpiecznik wycieraczka wysokich obrotach grzeje programatorem rt809f
ekspres naprawa żarówka szeregowo
Wzmacniacz Rotel: Cichy lewy kanał, jak podłączyć tuner? Schemat podłączenia selektora sygnału w Rotel