Nie chcę się przyczepiać, ale w jaki sposób kolega wyobraża sobie przeniesienie elementu z index-em 0 , na pozycję 1? Skoro element 0, ma się znajdować za elementem 1, to na jaką pozycję należy go przenieść, przed usunięciem go z pozycji 0 z listy?
Dostęp do bazy MS Access-a w Delphi można uzyskać dość łatwo. Na przykład za pomocą komponentów ADO. Potrzebujesz do tego dwóch komponentów : TADOConnection oraz TADOTable. Napisałem na szybko aplikację do połączenia z plikiem MDB, ale jest ona napisana w Delphi 2009, wiec raczej jej pod Delphi 7 nie otworzysz. Nie jest to jednak problem, bo aplikacja...
W standardzie nie ma takiej funkcji. Jest w unicie Math : MAX (int1,int2) - zwraca większy z dwóch argumentów integer. MIN (int1,int2) - zwraca mniejszy z dwóch argumentów integer. Mean (Dane : array of Double):Extended - zwraca średnią argumentów. CompareValue (A, B ) - zwraca -1,0,1 w zależności od A<B,A=B,A>B
Były Delphi, Denso , Valeo, Sanden, Mahle. Do wyboru. Jeśli jest gwarancja a olej u ciebie nie jest szarawy to może być po regeneracji. Też montowałem i nie było większych problemów. Najważniejsze to zalać dodatkową ilością oleju pag - więcej niż zalecana przez producenta - wtedy obędzie się bez przygód.
można traktować jako "programy" położone na serwerze do których strona WWW ma dostęp? To jest prawie tak samo jak np. skrypty PHP (z tą różnicą że aplikacje CGI znajdują się w wyróżnionym folderze np. cgi-bin i serwer ma ustawiony ten folder jako script path a php może być "wszędzie" ). CGI/ISAPI ma zaletę że jest wykonywane dużo szybciej niż interpretacja...
1. Czy wystarczy po prostu pobrać oprogramowanie z internetu i zainstalować na dysku aby móc je legalnie używać ? Witam. Przed pierwszym uruchomieniem programu trzeba w odpowiednie miejsce na dysku wrzucić plik licencyjny. Dostaniesz go mailem od Borlanda jak się zarejestrujesz na stronce, z której można pobrać Turbo Delphi. W wersjach Turbo nie można...
Tak się blokuje Alt+F4. "W onFormCreate wpisz taki kod: KeyPreview := True; A procedura na OnKeyDown formy ma mieć postać: procedure TForm1.FormKeyDown(Sender: TObject); begin if ((ssAlt in Shift) and (Key = VK_F4)) then Key := 0; end; " Źródło: http://michalive.socjum.pl/forum/temat/2
Wyświetlacz sie kończy.
Do zawieszonego wątku spróbuj użyć: if Assigned(Watek) then begin TerminateThread(Watek.Handle,0); FreeAndNil(Watek) end; Pamiętaj, że to ostateczność ! Zrób najlepiej jakiegoś TimeOut'a i gdy standardowe zamknięcie wątka: if Assigned(Watek) then begin with Watek do begin Terminate; WaitFor; end; FreeAndNil(Watek);...
Musisz zainwestować w to: :arrow: [url=https://sklep.certum.pl/bezpieczens...
Masz trzy opcje do wyboru: - port COM - czyli rzeczywisty port COM - USB - wybierasz to - Bluetooth - możesz to wybrać o ile głowica i Autocom ma Bluetootha Druga sprawa to nie podałeś jaki typ głowicy masz. Jeżeli masz DS150E to musisz mieć program CDP+, jeżeli stary typ głowicy (DS100) to musisz mieć program CDP (bez +). Wersja oryginalna bo ma naklejkę...
Nie da się tak (choć oczywiście każda klasa zachowuje swoją zmienną), ale można prosto obejść. Zamiast pola zastosuj własność (Property) i wówczas inherited już zadziała (ale bez kropki!). Podobnie jak zastosowanie w procedurze zmiennych lokalnych powoduje przykrycie i uniemożliwienie dostępu do zmiennych globalnych. Swoją drogą - świetny przykład na...
bo to wszystko jest źle ;] sprawdź tak: [syntax=delphi] procedure TForm1.Button1Click(Sender: TObject); var dane:string; begin dane := inputbox('okno wprowadzania danych','Podaj imie',''); if Length(dane) <> 0 then Label1.Caption:='Witaj '+dane; end; [/syntax] chyba o coś takiego chodziło ? podstawowy błąd to to, że w if niema żadnego warunku,...
....Jak będę miał tych CheckBoxów 100 to kod programu będzie miał kilka stron. Program powinien chować wiersz jeżeli CheckBox jest odznaczony, a pokazywać jeżeli jest zaznaczony. PS. z góry dziękuję za pomoc. Rozumiem, że Delphi? Wykorzystaj kolekcje Controls formularza. A to: [syntax=delphi]If CheckBox1 = True Then Rows("2").Hidden = False Else Rows("2").Hidden...
Pod każdym postem masz opcje napisania prywatnej wiadomości, maila oraz numer gg (jeśli autor go udostępnił). Możesz śmiało do mnie pisać z problemami w TP i Delphim :)
No tak, tylko czemu dalej uzywasz tego komponentu z dbexpress a nie biblioteki z z paczki . Dodatkowo w paczce masz przyklady uzycia tej biblioteki.Sprobuj je skompilowac i przeanalizuj je a komponenty z dbexpress zostaw w spokoju
http://www.google.pl/search?hl=pl&q=delp...
W tym wątku jest podane jak należy to sprawdzić. Mam nadzieję, że Ci to pomoże. http://www.elektroda.pl/rtvforum/topic12... Pozdrawiam i powodzenia!
Ponieważ kompilator Deplhi ze względów optymalizacyjnych dodaje tzw "padding", dzięki czemu wszystkie zmienne są umieszczone w pamięci na adresach które są wielokrotnością czwórki. Podobnie odbywa się także np. w C/C++. Rozwiązanie?: http://4programmers.net/Delphi/Packed
No to teraz po nitce... regedit: szuamy: ZFSendToTarget Znajdujemy klasę typu {888DCA60-FC0A-11CF-8F0F-00C04FD7D062} (sprawdź, czy na pewno) Teraz szukamy dalej tego właśnie ciagu... Znajdujemy %SystemRoot%\System32\zipfldr.dll Wpisujemy w google, znajdujemy już sobie sami odpowiedź...
Zamień Beep (Windows.Beep) na MessageBeep. //Delphi function MessageBeep(uType: Integer): BOOL; Funkcja MessageBeep odgrywa dźwięk. Dźwięk dla każdego typu jest określony odpowiednim wpisem w Rejestrze (podklucze klucza HKEY_CURRENT_USER\AppEvents\Schemes\Apps... Parametry uType Typ dźwięku. Parametr może przyjąć jedną z następujących wartości:...
Do saabowych sterowników wystarczy dobry ELM327 Chyba nie do wgrywania mapy.
Cofnij datę o rok w komputerze i wróci.
Witam, ja bym to rozwiązał w nieco inny sposób, mianowicie: stworzył bym wątek który by wysyłał dane na com, po wysłaniu w pętli bezczynności oczekiwał na wywołanie zdarzenia OnRxChar przekazywał bym je do wątku a w nim odpowiednio na nie reagował, czyli zapis/przetworzenie/wyświetlenie (w memo) odebranych danych i wysłanie kolejnej paczki danych na...
Poszukaj na tej stronce http://www.dbf.pl/faq/
Druga forma StrToFloat ma kontrolę nad konwersją, ale prawdziwy delhi-prpgrammer przecież nie czyta dokumentacji, to dla cieniasów
Down:=True; Application.ProcessMessage; Sleep(100); Down:=False; Lub w odpowiedzi na zdarzenia KeyDown i KeyUp. SpeedButton musi mieć właściwość pozwalającą na wyciśnięcie wszystkich przycisków z grupy, jednoczesnie musi posiadać odpowiednią liczbę grafik i być ujęty w grupie. Bo rozumiem, że chodzi o wizualizację wciskania?
Ta funkcja moze pomóc : [syntax=delphi]function WTSRegisterSessionNotification( hWnd: HWND , // Window handle dwFlags: DWORD // Flags ): Bool; // Return value[/syntax]
Witam! Jak wstawić tekst na zadanej pozycji w TMemo . Z góry dzięki za podpowiedzi!
Kod z tego pliku to 4131.
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...
Witam mam taki problem potrzebuje takich oto programow 1. Baza danych w oparciu o typ rekordowy, min 5 pól np. Imie, Nazwisko, Adres, Tel, itp. w tym tworzenie nowej bazy, zapisywanie bazy do pliku, dopisywanie do istniejącego pliku, usuwanie pliku z bazy, sortowanie (wg. jednego pola wystarczy) 3. Program obliczający dowolną całkę a) metodą trapezów...
To "drzewo", to komponent TTreeView. Znajdziesz go w zakładce Win32, w każdym Delphi. http://obrazki.elektroda.pl/4734803100_1... W/w komponent jest bardzo często wykorzystywany do tego celu tzn. do tworzenia zagnieżdżonych opcji/ustawień . Bardzo dobry pomysł aby go do tego celu wykożystać.
if Length(Memo1.Text) ...
Czemu nie zrobisz tego w ten sposób ? [syntax=delphi]function Swap32(value : dword) : dword ; assembler ; asm bswap eax end ;[/syntax] W ostateczności tak :[syntax=delphi]procedure Swap32(var src, dest) ; asm mov ecx, dword ptr[eax] ; bswap ecx ; mov dword ptr[edx], ecx end ;[/syntax] Przy pierwszej funkcji narzut nie powinien być duży...
To daj kod : Connection.Params.Append('Database=N... Ale zamiast NAME_OF_DATABASE daj nazwę swojej bazy danych.
P0038 : Obwód sterowania grzałki HO2S - sygnał wysoki (Bank 1, Czujnik 2 Otwarty obwód w zasilaniu, uziemieniu lub obwodzie grzałki czujnika O₂. Uszkodzony czujnik nagrzewnicy O₂. Uszkodzone lub zużyte złącza idące do czujnika. Czasami przyczyną jest uszkodzony moduł PCM. P0053 : Oporność grzałki sondy lambda (Bank 1, Czujnik 1). Otwarty obwód w zasilaniu,...
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...
Mi nie chodzi o konkretny tekst, po prostu po kliknięciu na button, ma się pojawić nowy element formatki taki jak label lub nowy button.
Witam! Piszę program (w delphi) do zdalnej kontroli komputerów, czy ktoś mi może powiedzieć jak wywołać akcję pojedyńczego lub podwójnego kliknięcia? chodzi o klikniecie w przycisk (Button)?
Witam W moim odczuciu kolega czeka w pętli na flagę gotowości lub coś podobnego. Proponował bym prześledzić cały kod odnośnie komunikacji. Osobiście komunikację po COM zawsze robiłem w oddzielnym wątku z powodu tego, że podczas komunikacji program zamierał, a w przypadku oddzielnego wątku jeśli gdzieś się zacięło z komunikacją to klikając zamknij program...
Poprawiłem kod. Teraz można konwertować bez pomocy plików. Błędy były w samej funkcji konwertującej. Wszysto w załączonym pliku.
Musisz zrobić procedurę w klasie, bo ta co pokazałeś jest "na zewnątrz" (metoda globalna), o tak: [syntax=delphi] // na gorze pliku type TForm1 = class(TForm) // tu zawartosc klasy, przykladowo button Button1: TButton; // itd itp // ..... // TA LINIJKE DODAJ - TWoja procedura procedure Moja(); // ..... // itp itd procedury // TA LINIJKE DODAJ - Twoja...
Masz problem z net.framework, odinstaluj net.framework zainstaluj Delphi, zainstaluj netframework. Tak to chyba było.
Proponuje zapoznac sie z FindComponent()
Witam. Czy istnieje jakaś prostsza metoda "aktualizacji aplikacji" niż poprzez uruchomienie drukiej aplikacji, zamknięcia aktualnej podmiany pliku exe tej pierwszej, zamknięcie drugiej... ? Chciałbym po stwierdzeniu że istnieje nowsza wersja na serwerze pobrać ją i podmienić aktualnie wykonywany plik. Jest to "miniprogram" który składa się z jednego...
A w czym problem? Definiujesz przed wydrukiem tego pola jego zawartość i po sprawie.
Witaj Z podanego linku wydobyłem zawartość source.zip do katalogu c:\cport\source Następnie odpalam Delphi, i z menu wybieram "File / Open project" w okienku wyboru pliku zmieniam typ szukanego pliku z "Delphi project (*.dpr, *bpg)" na "Delphi package (*.dpk; *.dpkw)" i przechodzę do katalogu z wypakowanymi źródłami (w tym przypadku c:\cport\source)...
PostgreSql + delphi. Czy ktos wie jak to polaczyc?
Od kilku godzin próbuję rozpracować komponenty InterBase. Potrzebuję utworzyć bazę danych bezpośrednio z poziomu kodu w delphi. W IBDataBase jest procedura CreateDatabase jednak po za wyrzucaniem błędu nie robi ona nic. Oczywiście wcześniej ładuję do DatabaseName ścieżkę gdzie ma być utworzona nowa baza, do Params wrzucam nazwe użytkownika i hasło,...
...podepnę się pod temat bo mam też problem z z delphi ds 150e. Otóż w moim przypadku łączy się np z Fordem, Chevroletem a z Citroenem nie ?. Program podpowiada ,że może jest brak możliwości diagnostyki??? może ktoś ma pomysł co jest nie tak ?!
Ponieważ wszystkie parametry to zwyczajne TStrings, możesz w momencie deklaracji zrobić np. coś takiego: Connection.Params.Append('Database='... Gdzie Edit1 będzie zawierał nazwę twojej bazy danych. Itd. Itp. :)
a tu byleś http://4programmers.net/C/Artyku%C5%82y/...
A może poniższy wątek Cię naprowadzi na rozwiązanie? https://stackoverflow.com/questions/1815...
Co do pkt 1.; to nie jest takie proste. Pozycja pojedynczego punktu nic ci nie da, bo musisz odkryć cały obszar wolny od "min". Tutaj masz gotowy program napisany w Delphi. Po prostu podejrzyj jak to jest zrobione : http://delphi.about.com/od/gameprogrammi... pkt 2 : Wydaje mi się, że zastosowanie StringGrid-a do Twoich celów jest...
Jeżeli ma to być poważne zajęcie , a nie netowy żart na elektrodzie skontaktuj się z firmami: -Bosch -Delphi -Denso Do wyboru , chociaż z ostatnią może być problem z częściami zamiennymi
Ogólnie trigger tworzy sie tak: CREATE TRIGGER nazwa_triggera ON nazwa_tabeli FOR INSERT, UPDATE AS kod triggera Jezeli chcesz to wywołać z Delphi to wrzuć to wszystko do stringa i przekaż do bazy. Powinno się utworzyć.
Kod to 5131, ale zostanie jeszcze chyba CAN do wyłączenia.
Ja mam takie pytanie czy jest możliwe dostanie sie i wyciąganie jakiś informacji z bazy danych MySQL na jakimś serwerze? A jeśli tak to może jakieś procedury i instrukcje ktoś mi podpowie?
"Events" arnoldziq tzn. powiem tak ostatni raz co kolwiek w Delphi tworzyłem 2002 :-) sporo mi wyleciało z głowy :-)
Witam wszystkich potrzebuje jakis program napisany w delphi ktory podlaczy sie do bazy sql i bedzie mogla ja edytowac.jesli ktos umie takie cos napisac prosze o kontakt
Witam. Ściągnij sobie komponent comport. Na forme wstaw 2 x memo, 1 x edit, 3 x buton i comport. 'button1 do łączenia i rozłączenia 'button2 do wysyłania 'button3 do ustawienia portu 'edit1 do wpisania tekstu jaki chcesz wysłać 'memo1 do odebrania tekstu 'memo2 do "pomocy" ustawione jako niewidoczne 'zdarzenie do ustawienia portu procedure TForm1.Button3Click(Sender:...
Nie wiadomo jaki jest typ zmiennej data. Zakładając że przyjmuje wartości 0 i 1 to wystarcza; [syntax=delphi] procedure TForm1.Button1Click(Sender: TObject); begin data := 1-data; write_value(enable,data,DName); end; [/syntax]
Moim zdaniem nie może być kilku form Form2. Przy tworzeniu form musisz im dawać nowe nazwy. [syntax=delphi] var i:integer; procedure TForm1.Button2Click(Sender: TObject); begin i:=i+1; with TForm.Create(self) do begin Width:=200; Height:=100; Left:=10; Top:=10+i*(Height+10); Caption:='Forma '+IntToStr(i); Parent:=self; Visible:=True; Name:='forma'+IntToStr(i);...
Witam, Mam pytanie dotyczące jak w temacie importu danych z pliku csv do bazy Firebird 2.0. Obecnie procedura importu wygląda tak: procedure TForm1.Dataimport1Click(Sender: TObject); var odczyt: TextFile; wiersz,czesc,S3 : string; data_old,data_new : string; time_old,time_new : string; i,x,y,dd,mm,rr,gg,min,sek : Integer;...
To jest liczba w formacie HEX(adecymalnym) i chcesz ją zamienić na DEC(imal). Czyli: google -> delphi hex to dec (pierwszy link jest nawet z elektrody :))
Witam Wszystkich Mam problem ze zrobieniem pewnej rzeczy w Delphi. Otóż chodzi mi oto żeby przy obliczaniu przesunięcia względnego scrollbar'a w lewa stronę delta była ze znakiem dodatnim a w prawą ze znakiem ujemnym. Na razie do tego celu używam przycisku ale chciałbym go wyeliminować ponieważ trzeba go klikać przy każdej zmianie kierunku przesuwania.
mi wstrzymuje wykonywanie pętli ( choćby testowo z "beep" ) jeśli nie jest w osobnym wątku. Dodano po 1 ps.win xp wiem że mogę użyć wątków które działają niezależnie ale nie zawsze jest taka potrzeba...
Witam! Jestem "szczęśliwym" posiadaczem Mondeo 2006 r. 2.0 TDCI z wtryskami oraz pompą Delphi. Opiszę mój problem z pompą i wtryskami, może to komuś pomoże, bo wiem że jest to nagminny problem tych aut. Zaczęło się od wyskakiwania "sprężynki" i gaśnięcia auta przy gwałtownym przyspieszaniu. Błędy diagnostyczne mówiące o problemach z układem paliwowym....
Nie orientuje się w tych sprawach, na moje garażu naprawy wystarczy, nie prowadzę zakładu, samochodu które podłączam przeważnie są to roczniki max 2014. Więc nie narzekam aktualnie. Posiadam drugi laptop gdzie win 10 już jest ale powiem szczerze że na XP łatwiej takie rzeczy instalować. To jak, ryzykować i instalować tego wowa? Może być tak że na tym...
Zainstaluj sobie taki komponent : [syntax=delphi]Unit CustomOpenDialog; Interface Uses Messages, Windows, SysUtils, Classes, Controls, StdCtrls, Graphics, ExtCtrls, Buttons, Dialogs, ComCtrls, Forms; Type TCustomOpenGameDialog = Class(TOpenDialog) Private ParentHandle : THandle; FMainPanel : TPanel; FManagerLabel : TLabel; FManagerNameLabel : TLabel;...
procedure TForm1.Button1Click(Sender: TObject); var ciag: string; I: integer; begin ciag := Edit1.Text; //Pobranie tekstu z pola edycyjnego Label1.caption := ''; //Czyszczenie labela For I := length(ciag) downto 1 do //Od długości tekstu w dół do 1 znaku Label1.Caption := Label1.Caption + ciag[I];...
Pojawił mi się kolejny problem, bo chce zrobić tak żeby te pytanie i odp wyświetlały mi sie w delphi a mianowicie, mam button który startuje grę i chce żeby po kliknięciu na niego przeskakiwało do następnego forma i tam wyświetlało działania, ale pisze kod i ciągle nie działa i nie mam już pomysłów, jakieś sugestie?
Sprzęgło kompresora wymienione. Czas pracy 1h. Poziom trudności 3/10 Aleksander_01 to możemy teraz pogadać. Nie trzeba zrzucać kompresora jak twierdziłeś. Demontaż prosty...Luzujemy napinacz ściągamy pasek wieloklinowy. Odkręcamy sprzegiełko osadzone na frezach, później koło pasowe było tam 1 zabezpieczenie (widać na foto) wyszło bez ściągacza. Wszystko...
Musisz sprawdzić go ale za tą cenę to ok. Przedewszystkim jest nowy z bazy danych więc jakoś to będzie za te 600:-) https://www.olx.pl/d/oferta/tablet-diagn...
Witam nie mogę sobie poradzić jak wywołać procedurę jej prototyp tak wygląda [syntax=delphi]procedure TForm1.TrackBar1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: integer);[/syntax] W przypadku buttona sprawa była prosta [syntax=delphi]Button1Click(Sender);[/sy... niestety w tym przypadku nie mam pomysłu jak to ma być wywoływane....
Dzięki za szkic programu, miałem się na czym wzorować :) Ja to napisałem tak i nie było żadnego problemu: [syntax=delphi] unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, ComCtrls; type { TForm1 } TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; Button4:...
mam w delphi takei 2 funkcje : function out32(PortAddress,ByVal:Integer):Integer stdcall;external 'inpout32.dll' name 'Out32'; function Inp32(PortAddress:Integer):Integer stdcall;external 'inpout32.dll' name 'Inp32'; i chcialbym za pomoca ich napisac program do wlaczania napiecia na jednym chociaz pinie jak zrobic?
Bardziej by mnie interesowało metoda podmienienia wskaźnika - ponieważ każda zmiana w moim programie jest robiona automatycznie: - Edit1.OnChange - czyli piszać literka po literce zawsze zmieniam dane w rekordzie (niestety nie mogę tego zmienić by zachować poprawne działanie programu na button "Zapisz")
Da się to napisać w każdym rozsądnym języku. Ja bym do tego podszedł tak, że dynamicznie dla każdego pliku tworzę buttony, labele, elementy listy, lub inne kontrolki z odpowiednio poporcjowanymi nazwami. Gdy użytkownik ułoży je i podzieli to plik zapisywany i tyle. Całość jednak wydaje mi się niepraktyczna - dużo pisania, dużo wyjątków, dużo czasu spędzonego...
Kod odczytany przez DKAG działa - zweryfikowane.
Czyli zielony przycisk Ci się sam wciska tak? Prawdopodobnie do wymiany taśma klawiatury funkcyjnej. Można też na początek sprawdzić soft, tzn wgrać nowy, jeśli masz czym.
wielkie dzięki Kuba - wcześniej miałem delphi 6 i nie było tam takiej możliwości. Masz może jakiegos arta o tych manifestach??. jeżeli tak podeślij proszę linka. jeszcze raz dzięki
reszte kodu tez tam czy na button ?
Cześć! Więc zrobiłem testy (na tym pierwotnym projekcie, bez transakcji) :) Zmieniłem tylko ścieżkę do bazy oraz w opcji projektu odznaczyłem Link with runtime package. I zadziałało (Delphi XE2, 32-bit; Firebird 2.1.4 64-bit). W Delphi 6 niestety nie mogłem otworzyć projektu. Więc to nie wina kodu, jeśli u Ciebie nie działa...
Czy może orientuje się ktoś jaki powinien być początek kąta wtrysku w interfejsie delphi ds-150? Pacjent to skoda octavia 1.9 tdi 90km agr.
To jak są reprezentowane dane zależy w głównej mierze od samej implementacji bazy danych. Inaczej dane będzie trzymał oracle, inaczej mysql a jeszcze inaczej sqlite. Są też bazy nosqlowe - cassandra, mongodb, orientDB i tak dalej. Przydatnym elementem przy używaniu baz danych jest ORM (np hibernate dla javy). Dla delphi znalazłem takie coś: http://www.instantobjects.org/...
Ok Super Działa!! A jak bym chciał również ukryć Button? Dla niego nie mam zdarzenia OnChange?
Czy chodzi o tą procedurę "procedure prostokat.wyswietl(memo1 : TMemo);" ?
No to jeśli chce PChar,to podaj mu w postaci PChar... [syntax=delphi]SetFileAttributes(PChar(E... +'/System.ini'), FILE_ATTRIBUTE_HIDDEN);[/syntax] Jeśli podajesz tekst wprost, to w rzeczywistości jest to traktowane jak PChar i ewentualnie niejawnie rzutowane na string. Jeśli coś jest wynikiem innej funkcji i jest sklejane...
Komponenty zaznaczasz (klikasz) a następnie klikasz na formularzu w miejscu gdzie chcesz go umieścić. Pod mój kod masz 2 textBoxy o nazwach (name): txtErrorCode oraz txtErrorDescription; oraz jeden Button o nazwie btnCheck.
Może wystarczy poprostu pod przyciskiem zrobić: [syntax=delphi]ADOTable1.Active := True;[/syntax]
Jeśli chodzi o apostrof w string-u, to wstawiasz go "dublując" go. Czyli zamiast : [syntax=delphi]s:='to jest ciąg z ' apostrofem'; <-- blad[/syntax] wpisz: [syntax=delphi]s:='to jest ciag z '' apostrofem';[/syntax]
function MemoSum( memo : TMemo ) : Integer; var i : integer; x : integer; begin x := 0; For I := 0 to memo.Lines.Count - 1 do x := x + StrToInt( memo.Lines.Strings[I] ); result := x; end;
Jak chodzi Ci o hamulec po puszczeniu włącznika tak jest to normalne zachowanie mające na celu bezpieczeństwo użytkownika.
Spróbuj połączyć się do bazy np. z VBA. http://connectionstrings.com/ Wg mnie błąd polega na błędnym logowaniu się do bazy.
Nie programuje za dużo w delphi, ale wydaje mi się, że to może być pomocne. http://www.lukas-home-page.ovh.org/artyk...
Dzień dobry! Jestem w trakcie pisania serwera WWW w Delphi w celu generowania dynamicznych stron WWW w przeglądarce po stronie klienta. Chciałbym w tym celu korzystać z PHP. Czy ma ktoś koncepcję/rozwiązanie/listing/pseudokod tego problemu. Chodzi o użycie intepretatora PHP z poziomu Delphi, a następnie zwrócenia tego do przeglądarki klienta. Pozdrawiam!...
var licznik: Integer; ... initialization licznik:=0; ... procedure OnTimer(...) begin ... if kierunek=w_lewo then inc(licznik) else dec(licznik); lblLicznik.Caption:=IntToStr(lic... end;
Mam ten sam problem ale rozwiązania nie znalazłem. Reset LB nic nie pomógł plik z innego też. Objaw po włączeniu WELCOME i potem Code error co 3.3 minuty LCD mrugnie po 3 mrugnięciu się wyłącza razem 10 minut W kostce zasilania są piny CAN A i CAN B może Can jest uszkodzony i radio nie widzi auta. Czekamy na rozwiązanie problemu.
delphi button kolor button przypisać arduino button
manometr klimatyzacja podłączyć smilo programowanie silnik wkrętarki bosch
sterownik zgrzewarki amplituner yamaha
Resetowanie centrali Satel Versa do ustawień fabrycznych Jak zatrzymać kręcące się kółko w aplikacji?