//deklaracja zmiennej Image :TImage; Image := TImage.Create; Image.Parent := Form1; Image.Left := 5; Image.Top := 15; Image.Width := 32; Image.Height := 32; Image.AutoSize := False; Image.Stretch := True; Image.Visible := True; itd. Image.Free; PS. jakbym cos zle napisal to Kolega Dżyszla mnie pewnie poprawi :) ja tam wole C++ Buildera ;)
Dzięki, ale szukam możliwości stworzenia i drukowania zawartości IMAGE bez zapisywania na dysku. Dodano po 10 Problem rozwiązany :) Printer.Canvas.Draw(0, 0, Image1.Picture.Graphic); Dzięki za zainteresowanie Pozdrawiam Puchała
Jak obrócić bitmapę w TImage w Delphi VCL? Używam Inc(Dir,10); i chcę płynnie animować obraz – GDI+, Graphics32, Skia4Delphi, obrót o dowolny kąt, obsługa timera.
1. ja bym nie uzywal Free tylko delete bmp, Free to sie ostalo z Delphi ;) 2. hm, zawsze przy drugim razie sie wylacza? czy przy jakichs konkretnych obrazkach, kod wyglada jakos niegroznie
Robisz najprościej tablicę elementów TImage i odwołujesz się jak do normalnego image o nazwie będącej zmienną. Wszak To jest dokłądnie to samo. Czemu wskaźnik? for(int i=0;i<10;i++) ImagesTable[i]=TImage->Create... . . . for(int i=0;i<10;i++) ImagesTable[i]->Free()... (mogę mieszać, nie...
Czemu sporo? with PaintBox.Canvas do begin Lock; //mażemy stare CopyRect(OldRect,Bmp.Canvas,OldRect&... //rysujemy nowe LineTo(x,y); Elipse(NewRect); Unlock; end; //i kopia do bitmapy: Bmp.Canvas.LineTo(x,y); Z kolei OnPaint: with PaintBox.Canvas do begin Lock; Draw(ClipRect,Bmp.Canvas.ClipRect... Unlock; end;...
Mam wersję 2010 :cry: Odnośnie samego obrotu to nie jest problem, wszystko pięknie działa, ale tylko przy niewielkiej ilości punktów i małym rozmiarze... Może jakieś inne pomysły? P.S. Czy jest dostępny w Polsce Delphi XE2, jeśli tak to jaka jest jego cena?
Mam pytanko co do rysowania linii. coś w stylu. Image1.Canvas.LineTo(100,100); jak wyłączyć aby nie łaczyło mi koniec linii z początkiem. Chodzi o to że jak rysuje wykres a potem zaczynam kolejny na tym samym Image to mi łaczy koniec pierwszego z poczatkiem drugiego. drugi problem, Jak wyczyściś pole: Image? do tej pory rysowałem prostokąt....
Witam. Tworzę w delphi kilka obiektów Image dynamicznie: ... //globalne zmienne: image: array[0..63] of TImage nri: integer ... // procedura tworząca obiekty TImage: image[nri]:=Timage.Create... Image[nri].Parent := Form1; Image[nri].Left := 5+nri*10; Image[nri].Top :=...
Może i mnie wyśmiejesz ponieważ rozwiązanie jest bardzo proste a efekt taki sobie, ale jest to najprostsze moim zdaniem rozwiązanie a czasem najprostsze okazują się niezastąpionymi ;) Po prostu sposób ten wykorzystuje zdolność "rozciągania" obrazka przez komponent Image
Sugeruję zapoznać się z tym wątkiem : [url=http://www.elektroda.pl/rtvforum/to... jak szybko wyświetlać odcinki na image'u ?
Oto czym na razie posługuję się przy dorywczym serwisie komputerów, zwykle niestety u klienta. Założeniem było wydać jak najmniej pieniędzy podczas kompletowania narzędzi. Mam nadzieję, że każdy znajdzie choć jedną przydatną rzecz. Skrzynka narzędziowa , a w niej: * Tester zasilaczy ATX (40zł) * Zarabiarka gniazd RJ45 (20zł) * Zarabiarka wtyków RJ45...
Nie :( Jednak bardzo dziękuję za odp. Udało mi się to zrobić na 2 form jak jedna ma alpha 255 to druga ma 0. I tak na przemian... uzyskuję efekt przenikania jednej planszy w drugą. Jednak problem polega by tego dokonać na jednej form. Kanał alpha posiada tylko Form a image już nie.
Image Edit Borlanda będzie pasował. W builderze C++ i w delphi znajdziesz w katalogu BIN. Generalnie program do ikonek ale obsługuje kursory, bitmapy, i pliki resource. Ale i tak paint najlepszy.
Witam, w delphi mogłem użyć poniższego kodu żeby wykasować obrazek z obiektu image o nazwie s, gdzie s była to zmienna... for k := 1 to Pred(form1.ComponentCount) do if form1.Components[k] is Timage then with form1.Components[k] as timage do if Name = s then Picture:=nil; czy jest jakiś porównywalny sposób na uzyskanie...
Witam. Tworzę projekt związany z grą w grę planszową. Stworzyłem już system losowania ilości oczek w kostce, a teraz chciałbym stworzyć procedurę dzięki której, w zależności od ilości wylosowanych oczek, będzie rysowana odpowiednia kostka. Lecz nijak bym próbował to nie mogę zacząć. Proszę bardzo o jakieś podpowiedzi. PS mam dwa pola typu image (plansza...
Dziala , tylko bardziej chodzilo mi o cos takiego zeby wyswietlalo liste pasujacych wynikow Ale najpierw musisz tę listę jakoś utworzyć, lub skądś pobrać, prawda ? Możesz to zrobić, bardzo prosto nawet przy pomocy jednego TEdit-a i np. Jednego TMemo. Umieść na formie jeden TEdit i jedno TMemo. Do zdarzenia OnChange dla TEdit-a napisz taką procedurę...
Witam. Mam do zrobienia w Delphi model koloru RGB (taki jak jest w Adobe Photoshop). Zrobiłem już wybieranie za pomoca przycisków R, G, B. mam zrobiony suwak i kwadrat z wartoscia na jakiej jest ten suwak. Wszytsko ładnie działa pokazuje mi wartość , kolor w Image się zmienia Jedno czego nie potrafie zrobić to ażeby było tak jak np. w Adobe Photoshop...
Wybieram plik i ścieżkę dostępu poprzez FileOpenDialog. To działa, wyświetlam ją w Label, ale tego stringa nie wiem jak przekazać do ShellExecute aby uruchomić wybrany program (lub otworzyc skojarzony plik). Gdy podam w ShellExecute ścieżkę i plik jawnie to OK, lecz jak wstawię w to miejsce zmienną to nic, chociaż w zmiennej jest cała ścieżka wraz z...
C:\Documents and Settings\Dawid>d: D:\>cd "\Dokumenty\Delphi\avi2wavXY" D:\Dokumenty\Delphi\avi2wavXY>dir Wolumin w stacji D to INST I DANE Numer seryjny woluminu: 4030-00C4 Katalog: D:\Dokumenty\Delphi\avi2wavXY 29.03.2009 13:44 <DIR> . 29.03.2009 13:44 <DIR> .. 23.07.2008 13:35...
Pod delphi to się robi tak: Making screenshots is actually easier than you may have assumed. This tip makes screenshots of the desktop only, but you can implement it to your needs. A lot of people have asked me how to get an image of the screen. For various reasons :-) I think this is a very usefull idea so I decide to include it in my FAQ....
Jesli dobrze pamietam TImageList posiada metode: GetBitmap( pozycja, bitmapa); no i zaloze sie (tez nei pamietam dokladnie) ze TImage posiada metode SetImage // edit: dokladnie mozna zrobic to tak (wybacz jesli beda bledy nie jestem specialista od delphi) Var image : TImage; imgList : TImageList; bmp : TBitmap; Begin imgList.GetBitmap(...
Witaj Najprościej to w szablonie raportu umieszczasz komponent graficzny (bitmapę lub metafile) i w property 'Image" wskazujesz na wcześniej przygotowany plik graficzny wykresu. W załączniku przykład.
Spróbuj tego : http://obrazki.elektroda.net/98_12597645...
Mam pytanie dotyczace grafiki w delphi.Czy mozna jakos odczytac kolor jakiegos piksela z obrazka (np.komponentu image).Cos odwrotnego do convas.moveto(y,x); canvas.lineto(y,x);
Nie ma takiej możliwości, grzebanie w pamięci jest zablokowane, ale zawsze można operować na obiektach Image albo podobnych do których jest dostęp przez odpowiednie metody obiektu tbitmap.
DZieki!!! Dziala w 100% :D
Tu jest wszystko co potrzeba: http://www.lazarus.freepascal.org/ a tu obrazek: http://wiki.lazarus.freepascal.org/Image... Po polsku niema za wiele o lazarusie, ale właściwie wszystko co zostało napisane o Delphi można zastosować do Lazarusa. Jednak ostrzegam, jest to wersja 0.9.2 i np niema debuggera jeszcze ...
Zamiast wczytywać ręcznie BMP, można wykorzytsać gotowe komponenty Delphi. uses Graphics, jpeg; var Image : TGraphic; begin Image := TJPEGImage.Create; try Image.LoadFromFile('plik_do_binaryza... { teraz można dostać się do pikseli poprzez Image.Canvas.Pixels } { można wykonać binaryzację czy cokolwiek } Image.SaveToFile('plik_po_binaryzacj...
najprosciem zrobic to tak: wczytaj bitmape do image, nastepnie za pomoca funkcji image.canvas.pixel[x,y]:=Tcolor; gdzie x,y to wspolrzedne pixela, a TColor to kolor w postaci HEX $RRGGBB. Pewnie nastepne pytanie bedzie brzmialo jak zapisac wartosc z ineger'a do tej zmiennej TColor. Rozwiazac to mozna nawiele sposobow, mozesz np tak: (Kazdy kolor jest...
Otwórz Notatnik i wklej w nim: Windows Registry Editor Version 5.00 Z menu Notatnika > Plik > Zapisz jako > Ustaw rozszerzenie na Wszystkie pliki > Zapisz jako FIX.REG > z prawokliku opcja Scal Zresetuj system.sprawdź w services.msc czy usługa Windows Defender wróciła do normy.
Witam, Mam mały problem. Pisze program, w którym na podstawiem obliczonych danych ustawia mi w Image któryś z obrazków z ImageList. W ImageList mam 10 obrazków. Procedure TForm.Button1Click(Sender: TObject); (...) x:=Label1.Caption; //obliczona wartość a:=StrToInt(x[1]); //pobieram pierwszą cyfrę ImageList1.GetBitmap(a, Image1.Picture.Bitmap); Wszystko...
W zakładce Additional masz komponent image. Włóż sobie go na formę i potem możesz do każdego przycisku dać polecenie: procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.LoadFromFile('c:\... end;
Ja bym spróbował Image.canvas.pixels , ale tego nie testowałem. ta medota odczytasz kolor piksla ale to polowa sukcesu parametry X,Y chce okresic za pomoca najechanei kursorem na te pozycje i tu jest problem ... :/
Kwestia wczytywania do Memo jest prosta - jak chcesz widzieć, to tak, jak nie to nie. Jednak jeśli będziesz chciał operować na tych liczbach to najlepiej wczytać je do dynamicznej tablicy, albo od biedy do TStringList. Y... "Styczna" to mi się kojarzy z pochodną funkcji ;) Co do klikania - najlepiej zrób sam wykres na Image i przy klikaniu obliczaj,...
To IMG to jakiś faktyczny wczytatny obrazek z dysku ? czy też poprostu umieścić komponent image na formie ?
Witam (at)faber W jaki sposób przypisac obrazek ???, jestem początkujący programista :p, i jeszcze nie robiłem czegoś takiego, proszę o wyrozumiałość, dziękuję i pozdrawiam vcd_a Po tym jak wstawisz komponent image w object inspector klikasz na właściwość picture i pojawią się 3 kropki obok - klikasz na nie poźniej load i dalej sobie poradzisz :D Oczywiście...
Chciałam się zapytać czy ktoś wie jak można ten program przerobić, żeby nie używać "Fly" i zrobić ruchomy obrazek zamiast napisu ? Kod wczytanego z pliku jest taki: " Bitmap.LoadFromFile('D:\1.jpg')" ale mi chodzi o obrazek już utworzony w Delphi "Image" na który został wczytany obrazek. unit DemoFrm; interface uses Windows, Messages, SysUtils, Variants,...
Witam! Podczas pisania programu natrafiłem na pewien problem. Mam do obsługi ponad 300 komponentów Image w Delphi. Nazwy komponentów wyglądają tak: Foto1, Foto2, ..., Foto300, itd. Chciałem wykorzystać pętlę łączącą nazwę FOTO z numerem porządkowym, ale jak to połączyć? "FOTO" jest typu STRING, numer typu INTEGER, a nazwa komponentu to TImage - ma ktoś...
Praktycznie wszystko w Windows jest tak czy inaczej prostokątem, np przyjmowanie kliknięć odbywa się w prostokątnych obszarach *) Czym innym jest pytanie "czy coś może wyglądać jak trójkąt" - większość obiektów VCL można powiązać z obrazkiem (bitmap, image) *) da się znacznym wysiłkiem.
Witam!! Mam tak banalny problem: Rysuje wykres na canvasie komponentu image i chcialbym po prostu zmienic tlo w image i na prawde nie wiem jak to zrobic...(zmienic tlo do wykresu)
ja zrobilem to tak na pomysle MirkaCZ inc(curve); X := OriginalX - Round(sin256(curve)*200); y:=y+0.5; le jezeli tworze obiekty przez : var i:integer; begin for i:=1 to 5 do begin with TWrog.Create(form1.dxspriteengine.en... do begin Image := form1.dxImageList.Items[1]; Width := Image.Width; Height := Image.Height;...
W jaki sposób uniknąć podanego na zdjęciach efektu, aby po maksymalizacji (lub ręcznym rozciąganiu) formy wszystkie komponenty łądnie skalowały sie do aktualnego rozmiaru formatki? Normalny widok formy: img296.imageshack.us/my.php?image=normal... Po maksymalizacji formy: img185.imageshack.us/my.php?image=maxxw8...
Albo(chyba najprościej) kliknij na Image Ctrl+X, następnie kliknij na panel i Ctrl+V. Kod też się nie straci.
Witam jak wstawiam komponent Image to podczas gdy po nim rysuje to całe pole robocze mam koloru białego chcę je zmienić na inny z palety TColor? Jak to zrobić?
Jestem na takim etapie i niby wszystko działa a nie widać efektu/ obrazka [syntax=Delphi] Unit1; ... procedure TForm2.FormCreate(Sender: TObject); var ImageDC : HDC; begin ImageDC:= Image.Picture.Bitmap.Canvas.Handle; MojImage:= TMojImage.Create(ImageDC); end; [/syntax] [syntax=Delphi] Unit2; ... type TMojImage= class private public FImage : TImage;...
Witam Rysuję rysunek na Image. Następnie otwieram plik tylko do sczytania danych poprzez okno dialogowe OpenDialog. Okno dialogowe marze mi mój rysunek. Jak zrobić aby rysunek cały czas był na ekranie. Jak wyczyścic Image z poprzedniego rysunku. Dzięki Zamykam. - arnoldziq
Oczywiście, że obrazki można ładować z zasobów. Jest wiele przykładów jak to zrobić, np: https://stackoverflow.com/questions/4125... i jeszcze trochę uwag dla nowszych Delphi https://stackoverflow.com/questions/1094...
jak to możesz ściągnąć w 60min. to ja się właśnie pytam jak to się stało!! borland_delphi_2005_enterprise_with_inst... tu masz nazwę pliku, zapuść sobie w eMulu...
Jak potrafisz programować to mogę np. zaproponować Delphi. Ładujemy obrazek do pola image (np. 20 x 20) i sprawdzamy pixel po pixelu kolor. Sprawdzoną linie możemy np. od razu wyrzucać na port LPT. Proponuję sterowanie multipleksowane. Panel powinien być 16 x 16 albo 24 x 24 bo takie układy cyfrowe można dostać :). Na wersy dekoder podpięty do licznika,...
1. sprawdzam czy jest wciśnięty przycisk myszy - jeśli tak to przesuwam obraz o "przesunięcie" - czyli myszą możesz przesuwać powiększony fragment. Przerysowuję podanymi przez Ciebie metodami - same odcinki - przed przesunięciem rysuję biały kwadrat o wielkości painboxa, wyliczam nowe odcinki w nowych miejscach i rysuję.... działa dobrze ale przerysowuje...
MPPS jak ponizej, chyba nie obsłuży tego sterownika Delphi http://i00.i.aliimg.com/wsphoto/v3/67705... BDM 100 też chyba nie będzie pasował http://image.made-in-china.com/2f0j00ivJ...
Piszę aplikację, która wykorzystuje 2 porty com = z kontrolki ComPort (3,1 pod Dlphi 7). Problem jest taki, że w pewnym momencie "sam z siebie" pojawił się problem z kompilacją programu. W momencie, gdy na pusty formularz przeciagnę dwie kontrolki i gdy od razu otwieram porty, np w zdarzeniu FormCreate pojawia się błąd kompilacji. Komunikat mówi, żer...
Kod który wysyła plik: <form method="post" enctype="multipart/form-data"&... <input type="file" name="fileupload" class="textfield" size="10"> <br /> <br /> <input type="submit" value=" Host it! " /> </form> Do serwera jest przesyłane: POST...
Możesz co najmniej na trzy sposoby właściwie, najzwyczajniej: Image1.Picture.LoadFromFile('podfold... lub (. to katalog bieżący) Image1.Picture.LoadFromFile('.\podfo... lub (chyba najpewniejszy) var dir: String; begin dir := ExtractFilePath(Application.ExeName&... Image1.Picture.LoadFromFile(dir...
No zauważyłem, że do dekodowania nie można podawać nagłówka np "data:image/gif;base64". Jak ci się udało zdekodować do obrazka-to mógłbyś napisać jak? Ja już blisko chyba rozwiązania jestem ,ale jeszcze mi to zajmie ;)
Rzeczywiście, TImage i canvas są w tym przypadku niezastąpione. http://obrazki.elektroda.net/46_12614902... procedure TForm1.Button1Click(Sender: TObject); var x : integer; step , y : real; begin image1.Canvas.Pen.Width:=1; image1.Canvas.Pen.Color:=clblack; image1.Canvas.MoveTo(0,(Image1.H... div 2));...
Źródło stronki: http://wrzucacz.pl/file/9391274343030 Treść odpowiedzialna za przycisk to: //<![CDATA[ recruiter_clicks = 1 //]]> </script><a href="/recruiter/recruit/34a72ysx9o... id="recruit_link" onclick="return(submit_link_as_... 'recruit_image'))"><i...
Witam Mam problem z komponentem TeeChart, a właściwie z poprawnym rysowaniem wykresów. Na poniższych linkach pokazane są wykresy, jeden z komponentu TeeChart, a drugi, na tych samych danych wykonany w Excelu: 1. Delphi http://img257.imageshack.us/my.php?image... 2. Excel http://img210.imageshack.us/my.php?image... Różnica...
Witam! Udalo sie komus zainstalowac komponent cport http://sourceforge.net/projects/comport w delphi 6?? mam z tym spory problem.. ciiagle wyrzuca jakies bledy np: [Fatal Error] DsgnCPort6.dpk(32): Bad file format: 'c:\program files\borland\delphi6\Lib\designide.dcp' poradzil ktos sobie z tym?? ps. screeny innych bledow jakie wyrzucalo prz probie kompilacji/instalacji...:...
Troszkę mało informacji na temat języka w którym to piszesz ale już mogę ci powiedzieć standardowo nie ma rameczki do zaznaczania (w znanych mi językach programowania) trzeba sobie takąwą zrobić (troche zabawy z tym jest) ewentualnie skorzystać z jakiegoś komponentu (jak dla delphi lub buildera) a pozniej tablica to po prostu nastepna bitmapa ktora...
Trochę namieszałeś z tą procedurą IdHTTPServer1CommandGet. To klient (przeglądarka) powinien decydować co chce od ciebie pobrać. Nie możesz wysyłać zawartości pliku HTML i zawartości obrazków równocześnie, nie "pytany" o to przez przeglądarkę. Klient wysyła zapytanie o stronę główną do serwera (twój program). Serwer odpowiada wysyłając kod strony, z...
Możesz wykorzystać komunikaty cm_MouseEnter i cm_MouseLeave generowane przez Delphi do sprawdzenia pozycji myszki. I przerobić sobie np. komponent TImage: Możesz mnie jeszcze uświadomić jak to przerobić, tzn. gdzie wkleić ten kod, bo nigdy jeszcze nie robiłem czegoś takiego :-(
Potrzebuję tworzyć sobie dynamicznie( procedure ChIm(const Num : byte); begin numer_zdj:=Num; ChangeImages; //to jest moja własna procedura end; ChangeImages; w OnCreate działa bez problemu, zaś w funkcji ChIm wywala błąd: Prosiłbym o jakąś podpowiedź co i jak mam zrobić, żeby to działało o ile da się to zrobić. Pozdrawiam
Witam, od paru godzin usiłuję napisać program rysujący krzywą interpolującą na podstawie podanych przeze mnie węzłów. Znalazłem w internecie kilka programów, ale albo kod jest dla mnie za bardzo skomplikowany, albo aplikacja jest w pliku .exe i nie mogę wejść do kodu. Na razie mam zrobione rysowanie na komponencie 'Image' węzłów na podstawie wprowadzonych...
Jeśli do skalowania wykorzystujesz własność Stretch, to po prostu zmieniaj ją (Image1.Stretch := not Image1.Stretch)
Jest ona bardzo rozbudowana - sama deklaracja to ok. 500 linii kodu, więc zamieszczę część tej deklaracji, ponieważ mam dość złożoną strukturę (kilka stopni dziedziczenia) tej klasy. [syntax=delphi] TLayer = class type Nibble = 0..15; private FName : String; FVisible : Boolean; FTransparent : Byte; FContrast : Nibble; ... dalsze pola, właściwości i...
Po przerwie powracam do tematu. Sporo komponentów znalazłem ale niektóre jednak trzeba zrobić ręcznie (za własne komponenty VCL jeszcze się nie biore ;) ), używam do tego pustego Image i ustawiam Transparent:=True w chwili rozpoczęcia rysowania np lini: Tasma_101.canvas.MoveTo(0,30); Tasma_101.Canvas.LineTo(Tasma_101.Wi... cało...
To co jest poza ekranem i sam nie zadbasz o pamiętaniu tego jest po prostu gubione. Stwórz obiekt typu TBitmap, na nim wykonuj operacje i wyświetlaj go na komponencie TImage. Obrazek ten będzie mógł zmieniać dowolnie swoją wielkość i zależnie od parametrów formy będzie można go skrolować. http://pl.wikibooks.org/wiki/Delphi/Bitm... Przykład: [syntax=delphi]unit...
Może spróbuj tak: with Image1.Canvas do begin Brush.Color:=clWhite; //Kolor dowolny , taki przyjmie Kanwa. FillRect(ClipRect); end;
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...
Witam, robie pewien edytor do gry który pozwala na rozpoczecie gry w wybranym sektorze, po nacisnieciu na wybrany kwadrat (jest ich 256, wczytalem duza mape a nastepnie wstawilem 256 komponentow image ktore odpowiadaja za klikniecie. Łącznie wyszlo ok. 260 procedur) X i Y ładuje się do Edit1 i Edit2 następnie opcją zapisz zapisuje do pliku .ini. Edytor...
Cześć! Jestem początkującym, program mam 1 dzień, Mam dwa pytanie więc tak: -Jak dodać playlistę do odtwarzacz mp3 w Delphi -Czy jest możliwość przesuwanie image(obrazu). 1.Pierwsze pytanie raczej nie trzeba tłumaczyć ;] 2. Natomiast drugie, chodzi mi o takie coś jak jest tu : unit sada1; interface uses Windows, Messages, SysUtils, Variants, Classes,...
Najlepiej, jakbyś pokazał taką serię obrazów i dokładnie zaznaczył. Bez tego można tylko teoretyzować. W najprostszym (ale i nie najszybszym) rozwiązaniu wystarczy Ci przeszukiwanie obrazu np w ten sposób: [syntax=Delphi] function ColorDiff(color1, color2: TColor); begin Result := Abs(GetRValue(color1) - GetRValue(color2)) + Abs(GetGValue(color1) -...
Mam taki oto problemik z programem. W programie jest główna forma. Z niej wywoływanych jest kilka form modalnych - w trakcie działania programu po naciśnięciu określonego przycisku. Ale jest problem. Przy kompilacji wyskakuje mi błąd: http://img177.imageshack.us/img177/3184/... Przy krokowym sprawdzaniu programu wychodzi że błąd ten wyskakuje...
Mam problem - w aplikacji DELPHI4 mojej na tle formy mam bitmapę (image) działało wszystko długo i dobrze, ale w miarę "rozrastania się" czasami po uruchomienu nie pojawiało się tło. Dziś już wcale się nie pojawia (dopisałem następnych kilka linijek kodu). Acha !!! Zapomniałem wspomnieć że wszystko jest ok po zminimalizowaniu i przywruceniu, lub jak...
Może zdarzenie OnChange? Occurs when an item in the list is about to change. typedef void __fastcall (__closure *TLVChangingEvent)(System:&#... Sender, TListItem* Item, TItemChange Change, bool &AllowChange); __property TLVChangingEvent OnChanging = {read=FOnChanging, write=FOnChanging}; Description Write an OnChanging...
Witam moj problem przedstawia sie nastepujaco jestesmy jakims tam samolotem i atakuja nas chordy wroga... i wszystko do czasu jest ok : w dxtimerze mam ... var RandEnemy : integer; begin if not DXDraw.CanDraw then exit; DXInput.Update; DXSpriteEngine.Move(LagCount); DXSpriteEngine.Dead; DXDraw.Surface.Fill(0); DXSpriteEngine.Draw;...
Wyniki sesji masz tutaj: http://www.gpw.com.pl/gpw.asp?cel=notowa... Np. dla notowan ciaglych rynku podstawowego masz: http://www.gpw.com.pl/zrodla/gpw/spws/sp... Trzeba sie podszyc pod przegladarke i polaczyc z hostem "www.gpw.com.pl" na port 80, i wyslac zapytanie np. jak IE: GET http://www.gpw.com.pl/zrodla/gpw/spw...
Mam wykres z testu rozruchowego fordowskim IDS-em sprawnej pompy Delphi w silniku 2,0tdci (całość na rozruszniku). Ponieważ 1 MPa to 10 barów, wychodzi na to, że po krótkim czasie (2 sek) pompa może podać nawet 1200 barów (a nie tylko żądane 200 ma duży zapas)... Test był robiony na ciepłym silniku (tzn dosyć szybko kręcił). http://img403.imageshack.us/img403/4623/...
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...
załaduj ikonki do komponentu ImageList, a następnie we właściwości "Images" PageControl'a ustaw nazwę komponentu ImageList. Pozdrawiam.
Nawiązuję do wątku założonego wcześniej, zgodnie z radą przechodząc z Delphi do PHP. Dopisuję więc pytanie tutaj. // Wstęp Od razu mówię, że NIE CHCĘ GOTOWCA, chcę się czegoś naprawdę nauczyć, więc będę wdzięczny za wskazanie kilku rzeczy w kodzie, który na bieżąco poprawiam. To mój pierwszy strzał z PHP, ale wcześniej naprawdę skomplikowane i duże...
oto i kod : unit Main; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DXClass, DXDraws, MMSystem, D3DUtils, DirectX; type TMainForm = class(TDXForm) DXDraw: TDXDraw; DXTimer: TDXTimer; DXImageList: TDXImageList; procedure DXTimerTimer(Sender: TObject; LagCount: Integer);...
Witam ! Twoj projekt jest bez watpienia 6/6 !!! kiedy go zobaczylem stwierdzilem ze musze miec cos podobnego :) wiec zabralem sie za budowe wiertarki numerycznej do plytek PCB, ma pelnic takze funkcje malej frezarki do niewielkich przedmiotow. Jak narazie wszystko jest w poczatkowym stadium. Zakladajac ze uda mi sie usunac wszelkie luzy, wedlug obliczen...
To sa moje ustawienia, przy których zazwyczaj pracuję : {$A+,B-,C+,D+,E-,F-,G+,H+,I+,J+,K-,L+,M-... {$MINSTACKSIZE $00004000} {$MAXSTACKSIZE $00100000} {$IMAGEBASE $15000000} W swoim kodzie wejdź w pustą linię, gdzieś na początku kodu i naciśnij kombinację klawiszy : Przytrzymać CTRL oraz dwa razy O . (Literka O...
Pobierz zmodyfikowane źródło i kompilat z : http://www.skyview.pl/ic.zip Programik jest domyślnie dla 176*132. Jęzeli chcesz obrabiać inny wymiar wywołaj z parametrami np. "imageconverter 200 300" (parametry oddzielone spacjami)
Witam i dziękuję za odpowiedź. Jeżeli już posiadam zwykłe karty MiFare na 13,56Mhz lub tagi Unique 125kHz IMPRO (r): [url=http://www.impro.net/index.php/hard... to czy jest szansa po ich przyklejeniu na szybę pojazdu na odczytanie przez wymieniony sprzęt RFID UHF czy należy...
Przeciez nic trudnego napisac wlasnego klienta ,nawet wskazane - jestesmy pozbawieni wtedy reklam. Dla przykladu skrobnalem logowanie wg opisu protokolu ze strony podanej wyzej, dziala ,wiec dopisanie reszty nie powinno byc problemem. Na forme 2 edity,button, idhttp i idtcpclient, zakladam ,ze pobieranie danych przebiega bezproblemowo , kod pokazuje...
Każdy kolor, jest budowany z 3 składowych RGB. Wystarczy odpowiednio dobrać tolerancję dla danej składowej koloru. Odpal sobie zamieszczony programik i 'pojeździj' myszką po obrazku. Własciwie cały program 'mieści' się w jednej procedurze i jednej funkcji do formatowania wyniku. [syntax=delphi]function ColorToRGBstring(Color: TColor): string; var R,G,B...
Cześć! Zacząłem pisać program w Delphi do obsługi protokołu gg, korzystam z tej dokumentacji: http://toxygen.net/libgadu/protocol/ i napotkałem problem loguje się w ten sposób: [syntax=delphi] var s,p:string; ziarno:Longword; login:tlogin; nagl:theader; bufor:string; host:string; port:integer; begin ms:=idhttp1.Get('http://appmsg.gadu-gadu...
Może nie autorem ale autorami są mechanicy którzy nie posiadając drogiego sprzętu w ten sposób lokalizują tego typu usterki. I jest to metoda naprawdę sprawdzona i skuteczna. -system zasobnikowy lub sferyczny https://delphi.com/shared/images/ppd/pwr... -szyna http://rb-kwin.bosch.com/pl-PL/start/pro...
Witam! Mam jedno proste pytanie. Chcę otworzyć plik graficzny w Image1, więc używam polecenia: Image1.Picture.LoadFromFile('Nazwa pliku'); Mam jednak inny problem. Mam już otwarty plik i muszę znać jego nazwę, jakim poleceniem ją odczytać i wyświetlić w Edit1:
Kopiowałem DLL i do folderu z aplikacją i do folderu Debug oraz System32. Błąd powstaje podczas kompilacji, jak również przy włączeniu aplikacji. A więc przedstawiam na początek: http://www.fotosalezjanie.granitowa.stre... Widać komponent na formatce oraz wprowadzone dane, niestety zmieniając "Connected"...
Nie chcę zakładać nowego tematu więc rozwinę dalej swój. Problem jest nadal taki sam nie mogę odtworzyć dźwięku podczas naciśnięcia przycisku dir := ExtractFilePath(Application.ExeName&... Image2.Picture.LoadFromFile(dir + '\liczby\jeden.jpg'); image2.Show; PlaySound('C:\Nauka\program\musi... or...
Użyj TImage a kolor pixeli możesz odczytywać/modyfikować za pomocą: Image1.Canvas.Pixels[X,Y] lub za pomocą szybszej metody przy użyciu: ScanLine Pozdrawiam...
Witam, jak zrobić piętrowe zakładki jak na tym screenie: http://aragorn.pb.bialystok.pl/~grekowj/... ??
Poczekaj - ale jak ustawiam Image1.Picture.Bitmap.Monochrome := True; to niestety nic nie chce się narysować - pusto ... jest próbuję teraz tak: [syntax=delphi] str := 'hello world'; image1.Picture.Bitmap.Monochrome := True; image1.Canvas.Pen.Color := clBlack; image1.Canvas.Brush.Color := clWhite; image1.Canvas.Font.Name := 'Calibri'; image1.Canvas.Font.Size...
Mam problem ponieważ moja aplikacja zbyt wolno działa podczas gdy pracuje z komponentem TImage i go opsługuje w jako wątek Thread. Poprostu rysuje sobie Image1.Canvas.Ellipse (); w ilości ok 500szt i je odświerzam co 5-35ms opuźnieniem np. Sleep (30); Problem jest tego typu że mi działa animacja ok co 0,5sek. Do odświerzania używam metody Synchronize...
Witam! Mam taki kod : Image1.Picture.LoadFromFile(e:\' obrazek.bmp'); Kod ten jak wiecie ładuje obrazek z określonej lokalizacji(e:\). Problem polega na tym że jak przenoszę ten program lub komuś wysyłam to już nie można załadować tego obrazka ,wyskakuje że nie można znależć określonej ścieżki itp. Czy można to jakoś ominąć tak żeby ten obrazek wszędzie...
Dalej nie do końca rozumiem. Mój kod wygląda w skrócie tak: Form4 type TForm4 = class(TForm) Image1: TImage; Label1: TLabel; RadioGroup1: TRadioGroup; Button1: TButton; Memo1: TMemo; Image2: TImage; procedure RadioGroup1Click(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } s:...
error image enigma2 image kernel image
oporność głośnik hobby linux kondensator mniejszy zasilacz
automatyczna zmiana czasu mikrotik parrot ck3100 aktualizacja
Licznik gazowy nie działa - co zrobić? Onkyo TX-NR545 - brak dźwięku: przyczyny i rozwiązania
