Rozwiązaniem problemu okazało się Turbo Delphi, jest darmowe i ma wbudowane komponenty do baz i połączeń internetowych. Znacie jakieś przystępnie napisane kursy do tego? Ogólnie chcę pobrać z bazy wynik zapytania SELECT, najlepiej do zmiennej, bez używania komponentów typu dbGrid.
Witam. Mam problem z sortowaniem bazy danych paradox. Używam następujące komponenty: TTable, TDataSource i TDBGrid (z zastosowaniem BDE). Program oparty o baze danych paradox. Gdy tworzę w bazie domyślny indeks dla tabeli (Key) to przy dodawaniu drugiego identycznego elementu wyskakuje błąd naruszenia klucza (Key Violation). Założeniem jest aby w bazie...
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....
Witam! Męczę się od kilku godzin ze znalezieniem przyczyny dlaczego nie działa funkcja kolorowania wiersza? Środowisko FPC LAZARUS + serwer FB2.50 (nie istotne). Robię to tak: Dodano po 44 Problem rozwiązany! Jak zwykle Lazarus wymaga ciągłego kombinowania. Ale to i lepiej. Powyższy kod jest wporządku tylko brakuje jeszcze linijki [syntax=delphi]DBGrid1.Canvas.FillRect(R...
Dzięki już wiem o co chodzi :D. Że tak jeszcze pozwolę sobie o coś spytać. Próbowałem odczytać liczbę wierszy z DBGrid i już nie wiem o co chodzi. label3.Caption:=IntToStr(Form2.I... wynik 18, czyli tyle ile DBGrid mi wyświetla jednorazowo, wystarczy przesunąć scrollbar'a żeby zobaczyć, że rekordów jest więcej niż 18. type...
Witam Nie mogę poradzić sobie z prostym problemem. Mianowicie jak przepisać wynik zapytania sqlowego do zmiennych delphi. Przykładowo wywołuje w programie jakies zapytanie w efekcie dostaje jakies dane (które moge sobie np. wyswietlic np za pomoca komponentu DBGrid) interesuje mnie jak te dane przepisac do zmiennych w delphi np do tablicy. Pozdrawiam...
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....
Reasumując: 1. Zrób index na sortowanym polu 2. Przejdź z Query na tabelke 3. Wykorzystaj inne komponenty do przeglądania danych. Jeśli chodzi o pierwsze 2 to konieczność :) a ten 3 to nie jestem pewien ale wydaje mi się że DBGrid jak jest podłączona tabela nie zasysa wszysztkich rekordów (pasek przewijania zawsze na środku). Co prawda ja już nie korzystam...
mam taki problem: mam tablice DBGrid z danymi liczbowymi( TDataSource, TTable, DBGrid) o 6 kolumnach, pierwsze 3 zapelniam danymi, ok 20-30 wierszy... ostsatnie 3 zostawiam wolne... na tym samym formularzu mam 3 pola TEdit w ktorych wpisuje pewne liczby... jak napisac procedurke taka aby wartosc liczbowa z 1 edita zostala wpisana do wszystkich wierszy...
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. Trochę zbyt skomplikowane - 6 kolumn po ponad 100 rekordów, do tego dochodzą kombinacje wyborów kolumn. O wiele prościej wykorzystać SQL Dla baz nie wykorzystując SQL - to stoi w sprzeczności...
Wykorzystalem inna metode: TblPrzedmioty->SetKey(); TblPrzedmioty->FieldByName("Nazwa_Przedm... TblPrzedmioty->GotoNearest(); Przez przypadek znalazlem to rozwiazanie podgladajac forum programmers.net, tyle ze tam bylo w delphi, ale ile to kropke zamienic na -> :) Nie do konca wiem czy jest wlasciwa,...
Nie rozumie dokladnie o co Ci chodzi? Dane masz w DBGrid i z DBGrida chcesz eksportowac do pliku tekstowego, tak? Wszystko jes mozliwe:] Jesli nie ma jakiejs metody do zapisu danych do pliku z DBGrida, to moze, jesli te same dane masz w bazie, wyeksportowac to z SQL'a np do pliku CSV.
Mogę podpowiedzieć jak to jest w Builder C++. Podejrzewam, że podobnie. Jeśli masz już zdefiniowany Secondary index to należy w projekcie programu połączyć odpowiednio pola:Master source i zdefinować połączenie z tabelą główną. Potem dla DBGrid wystarczy określić DataSource i będą się pokazywały informacje z tabeli. Powiem szczerze, że nie jest łatwo...
Cześć mam problem z dodaniem do bazy paradox obrazka. Bazę wyświetlam w DBgridzie i chciałbym do pola 'Ilustracje' wrzucić jakiś obrazek. Wiem że obrazki będą się wyświetlać w DBimage ale nie umiem w ogóle umieścić w tej bazie ilustracji. Bardzo proszę o pomoc :) Aha i jeszcze taki jeden mały problem, jak można zrobić żeby się wyświetlała w DBgridzie...
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;...
Ja mam natomiast pytanie jak powinna wyglądać procedura odczytu rekordów (jedna kolumna rekordów)z pliku txt do jednej kolumny komponenta DBGrid???Nie mogę nigdzie tego znaleźć ,a i sam nie mogę sobie z tym poradzić.
Sądzę, że lepiej to zrobić w oparciu o jakąś prostą bazę danych (np paradox w BDE) z komponentem DBGrid i Query. Pozdrawiam Sebastian Tomczyk
DBGrid.Columns[].Visible ? (strzelam)
Witam szukałem rozwiązań w sieci ale niestety nic takiego nie znalazłem bo być moze jest to tak proste że oto nikt nie pyta :) Mam taki problem Do ComboBox-a ładuje sobie nazwy pól z DBGrida za pomocą funkcji, Ukrywam przed użytkownikiem pozycję "ID" w DBGridzie i chce również wyrzucić tą pozycję z ComboBox-a. Sprawa się nieco komplikuję ponieważ chcę...
a Data Module to specjalna formatka w Delphi na którą kładziemy komponenty związane z bazami danych Dodano po 9 a Unit1 w całości wygląda tak Dodano po 13 Dziękuję zadziałało takie proste [syntax=delphi] with Unit2.data.IBQuzytkownicy, SQL do begin Close; Clear; Add('select id, login, haslo, imie, nazwisko, stanowisko, aktywny, usun, opis from uzytkownicy');...
Tu masz konsolkę SQL którą jakiś czas temu namalowałem :) działa z każdym zapytaniem to rozwiązanie ma tylko taką wadę że kiedy chcesz usunąć tabelę którą oglądasz w DBGridzie wyskakuje wyjątek ale ją usuwa, ale chyba nie masz tego problemu. [syntax=delphi]procedure TForm1.Button4Click(Sender: TObject); begin // konsola sql try SQLQuery1.Open; if SQLQuery1.Active...
Będzie ciężko to zrobić to co chcesz przy użyciu komponentów DB. One po prostu nie do tego służą. Można kombinować, zapisując zmienione dane z DBMemo czy DBGrid-a, ale żeby zapisać je do bazy SQL i tak musisz te dane przekształcić na zapytanie SQL. To nie jest nowy "problem", więc mozesz poczytać o tym na forum; np. tutaj : [url=][Delphi] Jednoznaczny...
Zapytanie podane przez kolegę musiałem nieco edytować bo były jakieś niezgodności z apostrofami Po łopatologicznych próbach typu [syntax=delphi]if SQLQuery1.Active then SQLQuery1.Close; // jesli SQLQuery1 wlaczony to wylacz // uaktualnianie DBGrida if IBConnection1.Connected then IBConnection1.Connected:=false; // jesli IBConnection1 wlaczony to wylacz...
TTable reprezentuje tabele w Bazie danych. Do DBGrida ładujesz całą tabele (TTable), lub tylko niektore kolumny, lub dane z kilku tabel w bazie (Query). Jesli chcesz wykasować dane na stale polecalbym to zrobic w SQL'u bo to w tym wypadku latwiejsze (nie trzeba tworzyc zadnej petli po poszczegolnych wierszach), albo wyświetlić w DBGridzie tylko potrzebne...
To wskazuje, że nie połączyłeś komponentu TADOTable z TADOConnection. I nie możesz się odwołać do ADOTable1.Connection. Przejrzyj poprzednie posty, tam powinny być obrazki z ustawieniami komponentów. --EDIT-- Oczywiście moja wina :( Dałem 2 razy obrazek do DBGrid-a zamiast do TADOTable - sorki :) Już poprawiam.
Widzę że serdecznie wszyscy mają mnie dosyć więc się pochwalę bo przyszedł czas na obsługę poleceń SQL-owych Moja wyszukiwarka wygląda następująco :D procedure TForm5.sButton1Click(Sender: TObject); begin if sComboBox1.Text = 'Wybierz kolumnę' then // jeśli w sComboBox1 jest napis Połączono wybierz kolumnę raise Exception.Create('Nie...
Witam. Właśnie wzbogacam swoją aplikację o import tabeli z bazy MySQL-owej do Access-owej. Utworzyłem połączenie z bazą MySQL-ową poprzez DBExpres, a potem z Bazą Accessa poprzez komponenty ADO Przerzucanie rekordów wygląda następująco procedure TForm1.Button4Click(Sender: TObject); begin SQLDataSet1.Open; //otwórz dataset SQLDataSet1.First;...
Witam porady kolegi za bardzo mi nic nie dały ponieważ chciałem to w jak najprostszy sposób wykonać eksport tabeli wyświetlanej w DBGridzie do nowo otwartego arkusza Excela Pobrałem komponent I niestety nie wiem jak to ugryźć Połączenie z bazą MySQL-ową tworzę za pomocą elementów SQLConnection1 -> SQLDataSet1 -> DataSetProvider1 -> ClientDataSet1...
1. Baza jes MySQL-owa 2. Piszę w delphi łącze się poprzez następujący zestaw komponentów SQLConnection1 -> SQLDataSet1 -> DataSetProvider1 -> ClientDataSet1 -> DataSource1 -> DBGrid1 Przy pobraniu w taki sposób danych var s : string; begin SQLDataSet1.First; while not SQLDataSet1.Eof do begin s := s + SQLDataSet1.FieldByName('jakieśPole'...
Z czego odczytujesz rekord bo nie widzę połączania z żadną bazą domyślam się że z DbGrida :?: Kolego formatuj kod bo to masakra albo wstaw w treść postu bo jak może zauważyłeś mamy mechanizm kolorowania składni dla mnogości języków. W innym wypadku nikt nie da rady pomóc, tylko podenerwuje się.
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.
Witam Mam problem i nie wiem co jest nie tak Mam stworzony plik bazy danych w Accesie. Na formatce w Delphi mam przycisk i komponenty bazodanowe ale wduszenie przycisku nie powoduje wyświetlenia danych. [syntax=delphi] with ADOQuery1 do begin ADOQuery1.close; ADOQuery1.SQL.Clear; //SQL.Add ('SELECT * FROM TT where Pole1=:aa2'); ADOQuery1.SQL.Add('SELECT...
Tak o rozwiązałem, [syntax=pascal]var A : string; // nr id begin A:=Form1.SQLQuery1.FieldByName('ID').AsS... Form1.SQLQuery1.FieldByName('ID').AsStri... Form1.SQLQuery1.Open; if Form1.SQLQuery1.Active then Form1.SQLQuery1.Close; // jesli SQLQuery1 wlaczony to wylacz // uaktualnianie DBGrida if Form1.IBConnection1.Connected then Form1.IBConnection1.Connected:=false;...
Zobacz we właściwościach dbgrid: Options -> dgEditing i ustaw na true.
Witam Mam pytanie czy poprzez DBGrida da się edytować zawartość bazy MySQL-owej :?: Pytam ponieważ ułatwiło by to obsługę programu i nie musiał bym tworzyć dynamicznie okienka do wprowadzania danych do bazy I jeszcze mam drugie pytanie jaka właściwość DBGrida pozwala na zaznaczanie całego rekordu, a nie tylko jednego pola w rekordzie :?: Pozdrawiam
W kodzie jest pokazane jak załadować z DBGrida do Edita więc mając już taki kod wszytko powinieneś sobie wykminić :) Pozdrawiam Tylko pod jakie zdarzenie to podpiąć? Korzystam z komponentu scalabium software - SMDBGrid jest tam zdarzenie OnGetCellParams które wykorzystuje do zmiany koloru komórki gdy komórka ma wartość mniejszą od założonej. Ale nijak...
Spróbuj zrobi cos takiego : 1. Wywal wszystkie odwołania do ZEOSa. 2. Jako źródło do DBGrid-a ustaw jakiś plik lokalny ( DBF, albo coś takiego) sprawdź czy problem występuje przy takich ustawieniach. Zrobiłem w/w zmiany w twoim kodzie, i wszystko działa idealnie: zarówno naciśnięcie Button1 czy TollButton :) wprowadza kursor do aktywnego DBGrida. Niestety...
Wygląda na niepoprawne kodowanie albo w DBGridzie albo w połączeniu do MySQLa. MyDAC masz dobrze ustawiony? Zobacz A druga sprawa to czy na pewno DBGrid nie konwertuje tego w locie na ANSI tak jak jest to opisane tutaj?
Witam. Mam do przemigrowania aplikację napisaną w Delphi7 do Delphi2010 z jednoczesną podmianą komponentów IBX->IBDAC i JVCL (szczególnie JV DBGrid na XDBGrid) z zachowaniem istniejącej funkcjonalności w oparciu o istniejący szkielet aplikacji docelowej (częściowo przemigrowanej). Program współpracuje z bazą danych Firebird. Testowe dane będą do dyspozycji....
Marek dane zapisywane są w bazie Firebird za pomocą zdarzenia OnRxChar komponentu CPort i procedury: procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer); var Str : String; plik: TextFile; begin ComPort1.ReadStr(Str, Count); Memo1.Text := Memo1.Text + Str; AssignFile(plik,'C:\beltway\rs23...
Język to delphi 2006 procedura importu poniżej: procedure TForm1.Button2Click(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; rekord: array [1..6] of string; begin AssignFile(odczyt,'C:\beltway\im...
Niedawno zainteresowałem się środowiskiem Lazarus (nie ma w tej chwili żadnej darmowej wersji Delphi bezpośrednio obsługującej bazy danych). Napisałem sobie mały testowy programik łączący się z bazą MS SQL przy pomocy ODBC. Okazuje się, że zamiast polskich znaków w DBGrid pokazują się pytajniki. Gdzie szukać problemu?