delphi timage

[DELPHI] pozycja piksla Timage odczytywana za pomoca myszki

Po co pobierasz X i Y myszy z Mouse jak masz jak na tacy podane X i Y poprzez argumenty zdarzenia MouseMove ? Zobacz: procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X , Y : Integer); Wystarczy teraz wykonać: procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin Label1.Caption:=IntToStr(X);...

DELPHI: Jak wyświetlić ikone w TImage pobraną z TImageList ?

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(...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Tworzenie dynamicznego obiektu TImage w Delphi - jak ustawić właściwości?

//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 ;)

[DELPHI] Jak zmienić kolor tła TImage na inny z palety TColor w Delphi?

FloodFill, względnie FillRect(angle) (piszę z głowy, więc coś koło tego).

Delphi - jak zdefiniować obszar np Timage lub PaintBox

A tak na marginesie - animacja grafiki to trochę nie za dużo jak na początek? Może by zrobienie zwykłego Painta wystarczyło? Jeśli już jakaś animacja, to zacznij od zwykłego przesuwania obiektów (np. TShape i odświeżanie przez metodę Repaint). Wiem, że to będzie wyglądało źle, ale w prostszy sposób zrealizuje animację.

[DELPHI] Jak przyspieszyć animację w TImage bez Repaint/Refresh?

Sugeruję zapoznać się z tym wątkiem : [url=http://www.elektroda.pl/rtvforum/to... jak szybko wyświetlać odcinki na image'u ?

[Delphi] TImage niewidoczne po przeciągnięciu na TPanel - jak to naprawić?

Zaznacz TImage w inspektorze obiektów (Obiect TreeView) i przeciągnij na TPanel, zmieni wtedy swoją hierarchię w drzewku, nie stracisz kodu który miałeś napisany dla TImage. Pozdrawiam

[DELPHI] Jak połączyć nazwę komponentu TImage z numerem w pętli?

Ale mówiłem - skoro i zmienia Ci się dajmy na to od 1 do 1000 to jak możesz wykorzystywać ten indeks do tablicy Foto? i jest indeksem tablicy Controls, a tablica Foto w tym przypadku powinna być indeksowana zmienną j

[Delphi] Ustawienie tapety jako tła formularza w programie

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...

[Delphi] Jak zmienić tło w TImage dla wykresu w Delphi?

Witam!! Rysuje wykres na Timage i chcialbym zmienic tlo timage.Jak to zrobic z poziomy programu?? Pozdro/smalski Zamykam. - arnoldziq

[Delphi] - Wyjaśnienie kodu: tworzenie i modyfikacja bitmapy w Delphi

Czyli z BMP do Timage ?

[DELPHI] Optymalizacja animacji TImage z użyciem wątków i Synchronize

Bez całego kodu tego wątku, to możemy tylko zgadywać, co się dzieje.

Jak stworzyć animację w TImage w Delphi 3?

Chciałbym mieć animowany obrazek w TImage, jak to zrobić? :( Już nie mam pomysłów. A może ktoś wie jak znaleźć info na ten tema? Pozdrawiam

[Delphi] Przyciąganie. Jak to zrobić tak jak w puzzlach?

Nie musi jako podkładka służyć TLabel może być inny komponent ,który przyciągnie mi TImage .

[Delphi] Jak zachować rysunek w TImage po otwarciu OpenDialog?

Ja to robię tak. Na formie rysuję czarny prostokąt. Na to nakładam TImage Następnie na czarnym prostokącie rysuje (TImage.canvas- i rysunek) Co robię żle. Czy istnieje możliwośc w Object Inspectorze od TImage narysowac czarny prostokat.

[Delphi] Wyswietlenie JPG na TImage z użyciem THandle coś w tym stylu

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;...

Jak zmienić Img.Enabled na true dla dynamicznie tworzonego TImage w Delphi?

Witam, natknąłem się na następujący trudność: Podczas tworzenia na formie obiektu Timage przypisuje mu img.enabled:=false; później w programie potrzebuję zmienić ten parametr na true ale nie wiem jak. TImage jest tworzony dynamicznie w taki sposób: rocedure TForm1.CreateImg(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X,...

[Delphi] Jak w Delphi narysować krzywą interpolacyjną metodą Lagrange'a?

Raczej: unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ImgList, ComCtrls, ExtCtrls, ToolWin; type Tabl = array[0..100] of real; type TForm2 = class(TForm) ToolBar1: TToolBar; Image1: TImage; ToolButton1: TToolButton;

Delphi 6 - Zliczanie kliknięć na TImage, problem z indeksowaniem tablicy

ale czemu w procedurze obsługi jest taka dziwna wartość? Jeśli definiujesz zmienną lokalną (w procedurze, funkcji), pamiętaj aby przypisać jej wartość początkową. W Twoim przypadku zmienna lokalna miała wartość obszaru pamięci RAM gdzie została ulokowana (sieczka).

Jak utworzyć tablicę obiektów TImage w Borland C++?

(at)Dżyszla: marnyc mówi, że nie zna się na Borlandzie, ani na dynamicznym tworzeniu komponentów, a Ty mu mieszasz z Delphi. Tutaj przykład dla C++: [syntax=cpp] const int max = 100; TImage *img[max]; for (int i = 0; i < max; ++i) { img[i] = new TImage(this); img[i]->Parent = Form1; } img[0]->Picture->LoadFromFile("C:\...

[delphi] jak szybko wyświetlać odcinki na image'u ?

OnPaint wykonujesz wtedy, kiedy taki komunikat dostajesz. Na BMP rysujesz równolegle lecz bez kropki. Nie używaj TImage ze względów wydajnościowych oraz zajętości pamięci. Wystartczy Bmp:=TBitmap.Create; A na końcu zwalnianie.

[Delphi] Jak ustawić widoczność nakładających się TImage na Formie?

Witam !!! Mam dwa TImage na Formie do jednego napisałem kod żeby go można było przesuwać , i właśnie jak nałoże ten TImage który przesuwam na ten drugi ,widoczny jest ten drugi a mi chodzi o to żeby widoczny był ten pierwszy . Pozdrawiam.

Graficzne przedstawienie położenia obiektu - Delphi

Możesz malować po canvas, a co do czyszczenia to nie ma takiej gotowej funkcji, najprościej rysować wypełniony prostokąt. A co do konstrukcji programu to polecam najpierw wygenerować obraz tła (osie, zarysy etc) w obiekcie TBitmap, następnie utworzyć nowy obiekt TBitmap skopiować do niego obiekt z tłem, następnie namalować interesujący obraz a na końcu...

[Delphi] Wczytanie dużego zdjęcia 8000x8000 do TImage przed startem programu

Witam, Czy jest jakaś możliwość wczytania dużego zdjęcia do Timage zanim uruchomi się nasz program? Nie chcę aby było widać jak obraz(jpg) o rozmiarach 8000x8000 zawiesza na parę sekund program.. Trochę kombinowałem z Splash Screen ale nic mi nie wychodzi... Z góry dzięki;)

Delphi: prosty sposób na Canvas większy od obiektu

Racja. Bardzo dziękuję za tę uwagę. Ale chyba jednak zostanę z tym obiektem TImage na Formie, bo wygodniej mi go utworzyć na TScrollBarze. Z drugiej zaś strony nie potrafię odświeżyć z poziomu wątku, który dotychczas obsługiwał bezpośrednio rysowanie na Canvas formy Tlo: [syntax=delphi]Tlo.Canvas.Rectangle(a, b, c, d); [/syntax] a który zamieniałem...

Odwoływanie sie do dynamicznie stworzonego obiekt TImage c++

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...

[Delphi] Jak załadować różne formaty obrazków do TImage bez błędów?

Diwne, że w ogóle załadowało Ci jpg do TImage. Jeśli chcesz 'porządnie' obsługiwać jpg, powinieneś dodać do sekcji uses słowo JPEG. W programiku deklarujesz zmienną np. x typu TJPEGImage i tworzysz ją (x:=TJPEGImage.Create). Do tej zmiennej można ładować pliki jpg. I na koniec wyświatlasz obrazek : Image1.Picture.Assign(X) Trochę to pokręcone, ale modół...

Delphi - Odbiór danych z ComPort i rysowanie na TImage za pomocą Canvas

int y=StrToInt(RevS);

[C++] Jak dopasować Image do Form w C++ Builder przy zmianie rozmiaru?

JIIIS - w pewnych przypadkach wygodniej jest skorzystać z TImage, którego nie trzeba ręcznie przerysowywać ;) i do czego służy w ogóle funkcja Dormant ?? delphi akurat nie znam :/ tom - a w pliku pomocy nie masz? ;) Poza tym BC++B i Delphi to na tyle bliźniacze produkty, że kod - po zmianie systematyki - jest w zasadzie identyczny.

[Delphi] [Delphi][C++] Odczyt koloru piksela z obrazu kamery na ekranie komputera

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...

[Delphi] Jak stworzyć wykres oscyloskopu w Delphi/C++ z użyciem DirectX?

Tutaj można zobaczyć jak wolno działa sposób który zastosowałem (Form1->Canvas->Pixels myrcioch wyświetlanie działa znacznie szybciej. Program po modyfikacjach można zobaczyć tutaj: http://www.elektroda.pl/rtvforum/topic14...

Grafika w Image1 z Delphi uzależnione od ruchu myszki

Timage nie ma opcji onmouse leave

Sterownik przemysłowy "GNUMASTER" - robimy ???

No o to mi chodziło. Sprecyzowanie: 1. Pasek po lewej stronie z ikonkami. 2. Przeciągając ikonki na pole robocze można ustawiać. 3. Ikonki są blokami warunkowymi i wykonawczymi. 4. ikonki będzie najprościej zrobić przez obiekt TImage (w Delphi) Jak to zrobię to podeślę ze źródłami. Będzie to uniwersalne. (Ja zrobię na BASCOMA(tylko ten język programowania...

Jak narysować i edytować linie w Delphi do symulacji układów?

OnPaint Alternatywnie rysować po Canvie TImage - on sam się przerysowuje.

Jak stworzyć ruchomy obrazek w Delphi bez użycia Fly?

Jeszcze mam pytanie czy można jakoś inaczej zapisać w Delpi długość, szerokość i widzialność obiektów ? Bo mi wskazuje błąd na "Width", "Height" i "Visible". Błąd Ci wyskakuje, bo TForm.FindComponent zwraca zazwyczaj klasę TComponent , która nijak się nie na do TImage i jego cech, których używasz. Jak już koniecznie chcesz sobie życie komplikować,...

Jak rysować i próbować wykresy w Delphi jak w Paint? Szukam komponentu.

Możesz wstawić na formę komponent TImage i odpowiednio oprogramować zdarzenia myszy. [url=http://4programmers.net/Delphi/Goto... jest jakiś przykład.

[DELPHI] Jak zaimplementować wyszukiwanie zdjęć w Delphi z folderu programu?

Drodzy koledzy. Widzę, że w temat zaczyna się wkradać chaos. Zamieszczacie kody które "zaciemniają" cały proces w niewiarygodny sposób. Autor tematu chciał pokazać obraz z pliku JPEG w kontrolce TImage. Po co tworzyć jakieś wydumane połączenia z plikami BMP lub zapisywanie ich na dysku? Cała operacja odczytu i wyświetlenia pliku JPEG zawiera się w kilku...

Delphi 4: Jak wykonać procedurę co 1s i zrealizować opóźnienie?

Tak na "chłopski rozum" to rzutowanie typów to nic innego jak konwersja typów. Zauważ, że funkcja FindComponent() zwraca wynik typu TComponent, który nie posiada metod TImage (Picture, Bitmap,FreeImage,itp). TImage(FindComponent()) "mówi" kompilatorowi, że znaleziony komponent jest typu TImage i jako taki powinien być traktowany w programie. Pozdrawiam...

Jak przetworzyć grafikę na tablicę dla wyświetlacza 240x128 w Delphi?

na pewno nie układaj tyle komponentów bo nie dość że się komp zmuli konkretnie po tym programie, to Ty będziesz to pisał ze dwa lata...jak do każdego z ponad 30tys. komponentów chcesz napisać procedurkę....lol... Użyj TImage, masz tam onMouseDown (taki event) on wykrywa naciśnięcie klawisza myszki nad obszarem i pojade względne (lewy górny róg obrazka...

[delphi] [Delphi] Jak narysować układ elektroniczny przy starcie bez FormPaint?

Tak naprawdę bez zdarzenia WM_PAINT to nic byś nie widział na swojej formie. Każdy wizualny komponent w rzeczywistości je obsługuje. Są tylko dwie kwestie: 1. Na ekran (formatkę) wrzuca się już gotowy, wygenerowany w pamięci obraz 2. Zamalowuje się tylko konieczny obszar. Proponuję w Twoim przypadku narysować do własności Picture.Bitmap.Canvas komponentu...

jak rozpoznać z którego obiektu Timage wywołano zdarzenie?

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 :=...

Jak umieścić i sterować grafiką na formie w Delphi?

Jezeli chodzi o odswiezanie to teoretycznie nie powinno sie tak dziac jak mowisz, czyli po przeslonieciu oknem i potem odslonieciu powinno byc wszystko widoczne - chociaz moge sie mylic, dawno nie pisalem w Delphi ;) Zauwaz jednak, ze jak bedziesz odswierzal caly obrazek to bedzie nieprzyjemny efekt migotania obrazka - lepiej by bylo zrobic glowne tlo...

Jak wyświetlić nazwę otwartego pliku w Delphi w Edit1?

Nikt na nic nie wpadnie - nie da się z TImage uzyskać w żaden sposób nazwy pliku... No chyba, ze zaczniesz przeszukiwać dysk pod kątem identycznych plików graficznych ;)

[DELPHI] Jak zmienić kolory w bitmapie w Delphi za pomocą ComboBox?

Z użyciem ScanLine, kolor jest zmieniany prawie w czasie rzeczywistym - sprawdziłem. To może kolega się kodem podzieli? :P Tu nie ma się czym dzielić :-). Do konwersji RGB->HSV->RGB użyłem "na szybko" znalezionego unit'a: [url=http://users.atw.hu/delphicikk/list... [syntax=delphi]unit Main; interface uses Winapi.Windows,...

Delphi 7 - biblioteki do rysowania wykresów, dostępne opcje?

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));...

[DELPHI] Jak uruchomic tą binaryzację! [PROŚBA DO PIROMANA]

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...

[delphi] [Delphi][SQL] Jak wysłać grafikę BMP do BLOB w bazie Paradox7?

Witam! Mój problem polega na wysyłaniu grafiki BMP do bazy paradox7. Prędzej nie było problemów (Komponenty DBE)ale musiałem przejść na SQL. Nie wiem wysłać plik poprzez SQL, zapisuje plik do TFileStream. z powodzeniem bo wyświetla się w TImage, ale nie mogę wysłać go do bazy. Oto kawałek kodu. Kod poprawiłem. - arnoldziq

Delphi - przycisk włączający i wyłączający skalowanie wyświetlanej grafiki

Dopiero się uczę więc proszę o wyrozumiałość. To są moje pierwsze kroki w programowaniu. Oto mój program: [syntax=delphi]unit projekt6a; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtDlgs, StdCtrls, ExtCtrls, Jpeg; type TForm1 = class(TForm) Image1: TImage; Button1: TButton; OpenPictureDialog1:...

Delphi: Jak działa fragment kodu z rekordem `butyrek`?

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...

Puzzle w Delphi - jak zrobić przyciąganie do siatki?

Witam! Piszę sobie grę Puzzle .Mam już komponent TImage dla którego napisałem kod żeby go sobie przesuwać , i faktycznie można go przesuwać .Ale chciałbym go umieścić np. w jakieś siatce tak jak to jest w puzzlach i żeby został przyciągnięty przez tą siatkę .Jak narazie to nie mam pomysłu jak to zrobić ,dlatego proszę o pomoc . Z góry dziękuje za podpowiedzi.

Delphi - Jak stworzyć formę przezroczystą i przenikalną jak hologram?

Oki... to w taki razie mam takie pytanie.... Jak chcę zrobić formę przeźroczystą za pomocą :TransparentColor. I na tej formie jeszcze umieścić Tlabel jakis lub Timage z obrazem png z kanałem alpha. to dzieje się coś takiego: kolor użyty do wycięcia czyli TransparenColor zostaje w miejscu kanału alpha png oraz na obrzeżasz liter komponentu Tlabel. Jak...

Jak wybrać i zapisać piksele 8x8 z obrazu 800x600 w Delphi 6?

Użyj nałożonego TPaint i dokonuj za każdym razem mazania starej pozycji poprzez nadpsianie jej danymi z TIMage (TBitmap) i narysowaniem prostokąta. Włączenie rysowania robisz w OnMouseDown (ustawiasz falgę), rysowanie w OnMouseMove (jeśli flaga ustawiona), a wyłączenie (skasowanie flagi) + ewentualne akcje w OnMouseUp (jeśli flaga ustawiona)

C# - Jak usunąć obrazek z obiektu Image o nazwie zmiennej?

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...

[Delphi] Komponent akceptujący przeciągnięte pliki

No i stało się - powstał [url=http://www.dzyszla.aplus.pl/program... komponentów, na które można przeciągnąć pliki :) I pięknie działa. Z jednym tylko problem - chciałem to samo zastosować dla TImage, lecz ta klasa nie dziedziczy z TWinControl, przez co nie ma czegoś takiego, jak WndCreate/WndDestroy. :( I pytanko - czy w zasadzie...

[Delphi] Jak zapisać złożony obiekt z tablicami i podklasami do pliku?

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...

[Delphi] Dodanie bitmapy do pliku RES i wywołanie go.

Witam, mam problem z załadowaniem pliku z źródła aplikacji do np. TImage. Tworzę sobie plik obrazki.rc a w nim takie linijki: BITMAPA1 BITMAP "obrazek1.bmp" BITMAPA2 BITMAP "obrazek2.bmp" Uruchamiam tryb poleceń, wrzucam obrazki do pliku obrazki.res za pomocą programu brcc32 i jest wszystko ok. W źródle projektu deklaruję {$R obrazki.res}...

Jak przekazać i modyfikować zmienną `s` między Form4 a Form5 w Delphi?

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:...

Automatyczne przejście z edit1 do edit2 w Delphi i tryb poleceń w WinXP

Robię sobię taką grę Kości - poker . Jak to jest w grze, w której się gra prawdziwymi kośćmi, zasady są podobne do gry karcianej. Mniejsza o to o co w tej grze chodzi ale o to, że mam kilka problemów: 1. Podczas naciśnięcia przycisku LOSUJ gra powinna wyświetlić 5 losowych numerków (oczek kostek). Ok, z tym nie ma problemu, ale jak jeszcze raz uruchomię...

Delphi - poprawne wstawianie rysunku w kodzie, co robię źle?

Najprościej to będzie utworzyć katalog zawierający spis rysunków w postaci pyt nr_pyt .bmp , a następnie przy przechodzeniu do następnych pytań dokonać takiej operacji PicFile:=ExtractFilePath(Applica... if FileExists(PicFile) then begin Image1.Picture.LoadFromFile(PicFile&... Image1.Show;...

Delphi -> Builder: klika linijek do przeniesienia

Witam ponownie! Z powyższym problemem sobie poradziłem. Pojawił się natomiast kolejny. Poniżej kod funkcji, która zamienia wszystkie kolory na odcienie szarości: { BYTE R,G,B,BW; Graphics::TBitmap *Tmp; Tmp = new Graphics::TBitmap(); Tmp->PixelFormat=pf24bit; Tmp->Assign(CurrentImg); //CurrentImg przechowuje...

Delphi - ładowanie obrazów przy starcie i uruchamianie plików z przycisków

Witam wczoraj postanowiłem napisać prosty programik który miałby uruchomić plik "cmd" Program miałby wyglądać następująco... -7 zakładek (z tym sobie jeszcze radzę) -w każdej zakładce inny obrazek oraz przycisk -obrazki mają się ładować razem z uruchomieniem programu* -kliknięcie w przycisk w zakładce nr1 uruchamia plik nr1 kliknięcie w przycisk w zakładce...

Jak wczytać gify w Delphi7? Szukam komponentu do obsługi gifów

problem rozwiązany znalazlem biblioteke do Timage.

TListView z CheckBoxami: Jak dodać ikony do SubItemImages w Delphi?

Czy to jest normalne zachowanie, że jeśli var li: TListView; imgl: TImageList; . . . with li do begin ViewStyle:=vsReport; Checkboxes:=True; SmallImages:=imgl; end; ...to... with li.Items.Item[0] do begin ImageIndex:=0; SubItemImages[0]:=0; end; ...nie przynosi pożądanego efektu - nie widać ikony przy drugiej...

[Delphi 7] Dodanie playlisty do odtwarzacza MP3 i przesuwanie obrazu

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,...

Jak narysować kostkę do gry w Delphi w zależności od wylosowanych oczek?

Witam. 1. Zacznij od przygotowania sobie obrazka (BMP) z wszystkimi kombinacjami kostki. Obrazek powinien mieć wymiary 6*szerokość na wysokość, np. jeśli kostka ma wymiary 32 na 32 piksele, to obrazek powinien mieć wymiary 192*32 piksele. W programie np. Paint, ustawiasz obok siebie wszystkie obrazki kostki. Przykładowy obrazek może wyglądać tak: http://obrazki.elektroda.pl/6821341300_1...

Jak rozwiązać błąd logowania w Delphi 10.3 z Firebird 2.5?

a Data Module to specjalna formatka w Delphi na którą kładziemy komponenty związane z bazami danych https://obrazki.elektroda.pl/2854872900_... 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,...

Jak w Delphi przesunąć suwak RGB po wybraniu koloru z palety?

Oto jest kod programu: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Image1: TImage; KONIEC: TButton; RadioGroup1: TRadioGroup; r: TScrollBar; Label1: TLabel; WR: TLabel; g: TScrollBar; Label2: TLabel; WG: TLabel; b: TScrollBar; Label3: TLabel;...

[Delphi] Jak zmienić długość wskazówek w stoperze analogowym?

Dzięki za pomoc problem rozwiązany zamykam temat i załączam kod gotowego programu może kiedyś komuś się do czegoś przyda;] unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Label1: TLabel;...

[delphi] Jak napisać warunek w Delphi do obsługi przycisku BitBtn1 i Timer1?

A to przez USB jest? To sprawdź, czy masz sterownik poprawny. W końcu już się wkurzyłem i zrobiłem kilka eksperymentów Najpierw zacząłem wysyłać dane przez terminal i także było źle potem dopisałem do wysyłanych danych #13#10 do wysyłanych i zapętliłem program sprzętowo , i także źle W końcu "zapętliłem" dwa wynikowe programy na dwu różnych komputerach...

Jak prawidłowo zapisać ikonę 24-bitową w Delphi bez utraty jakości?

Mam w TIcon ikonkę 24 bit, wyświetlam ją na TImagei jest OK,ale przyjdzie do zapisu, to już gorzej. Po zapisaniu ikonajest zdeformowana i zdajesię ma mniej kolorów. Ma ktoś pomysł jak taką ikonkę prawidłowo zapisać ? Druga sprawa : ma może ktoś coś o strukturze pliku ikony ?

Błąd Scan line index out of range w programie Delphi z ASM XOR

Witam. Mam pytanie czy jest w stanie mi ktoś pomóc znaleźć błąd w kodzie i gdzie go popełniam. Może zacznę jest to program do szyfrowania i deszyfrowania w asm połączony z Delphi tzn szkielet programu zrobiłem w Delphi a sam kod miałem zrobić w asm (funkcja szyfrująca XOR).I tutaj pojawia się dla mnie problem, bo gdy zaczynam szyfrować i to pojawia...

Jak naprawić błąd konwersji StrToFloat w Delphi 7 przy metodzie Gaussa?

Witam Mam problem z zamainą StrToFloat. Otóż napisałem program w vcl w delphi 7 który ma rozwiązywać układ równań metodą gaussa. Równania zapisujemy w jednym stringgridzie a wyrazy wolne w drugim stringgridzie. W kolejnych dwóch stringgridach wyświetlana ma być macierz górnotrójkatna a w 5 stringgridzie wyniki obliczeń. Obliczenia są wykonywane po naciśnięciu...

[Delphi] Jak stworzyć obracające się figury 3D w Delphi na zaliczenie?

Znalazłem w książce kod do kostki. Poprawiłem go i mam takie coś: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Spin; type PointType = Record x,y: Integer end; Punkty = Array[1..1000] of PointType; Wez = Array [1..8] of Real; TForm1 = class(TForm)...

Jak posortować alfabetycznie w TStringGrid w Delphi?

Witam mam taki problem potrzebuje przerobić kod aby mi sortował w tabeli TstringGrid nazwy alfabetycznie sortowanie numeryczne działa ok ale niestety nie wiem jak zrobić aby działało alfabetycznie. Próbowałem wklepać tego gotowca: http://4programmers.net/Delphi/Gotowce/A... Jednak wywala mi błąd praktycznie od początku...