delphi fonty

TFT 4,3" - ATmega32, karta SD, ramka foto, dynamiczne fonty

http://obrazki.elektroda.pl/4424216100_1... Witam, Chciałem dzisiaj zaprezentować praktycznie już gotowe rozwiązanie ramki fotograficznej własnej konstrukcji. Wprawdzie wcześniej jakoś w ogóle nie brałem się za wykorzystywanie wyświetlaczy graficznych, szczególnie tych maleńkich popularnych z telefonów Nokia - bo nie widziałem dla nich żadnego...

Pixel Factory - generator fontów graficznych LCD (do C)

http://obrazki.elektroda.pl/4249940400_1... Witam, W związku z tym iż zająłem się głębiej wyświetlaczami graficznymi w tym matrycowymi oraz LCD (TFT color), zmuszony byłem przygotować sobie narzędzie do wygodnego generowania fontów graficznych różnej maści. Dlatego chciałbym przedstawić program "Pixel Factory". Jest to kompletny program w...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Delphi - Jak skonwertować font do monochromatycznej bitmapy?

Ustaw własność Monochrome na True dla bitmapy, po której kanwie rysujesz. Pomysł jest szczęśliwy, bo inaczej tego nie zrobisz ;) Co do samego wygładzania - w windows Vista i nowszych funkcje wygładzania są wręcz wymuszone... Generalnie wszystkie czcionki są wektorowe, stąd przekształcanie na bitmapy tak się kończy. Możesz alternatywnie użyć czcionek...

Jak dodać niestandardowe fonty do pliku EXE w Delphi?

Witam Muj problem polega na tym ze : Napiaslem sobie maly programik w delphi buttony udekorowalem ladnymi fontami (takimi ktorych nie ma w windowsie ) i wszystko jest ok tyle ze jak uruchodzmie ten program na innym PC to dane fonty som jako zwykle Wie ktos moze jak dodac do projektu czcionke , tak zeby byla na stale w pliku wykonywalnym exe ? Pozdrawiam

Jak dołączyć niestandardowy font do projektu w Delphi?

Zrób tak: 1. Skopiuj font.ttf do katalogu c:\windows\fonts ; 2. Zarejestruj czcionkę w rejestrze systemowym ( 'HKEY_LOCAL_MACHINE\Software\Microsoft\W... ); 3. W swoim programie wykonaj AddFontResource('c:\windows\fonts\font.t... ; 4. W swoim programie rozgłoś SendMessage(HWND_BROADCAST,WM_FONTCHANGE... . Po tych czynnościach (wykonanych tylko...

Jak wygenerować bitmapę lub tablicę 0/1 z czcionki TTF dla wybranych znaków i rozdzielczości?

Na szybko "skrobnąłem" prościutki programik, który renderuje napis i zapisuje go do pliku BMP. Możesz zmieniać tekst, kolor tła, rodzaj, kolor i wielkość fontu TTF. Kod źródłowy jest napisany w Delphi 5 Professional. Program jest bardzo prosty, więc nie powinno być problemów z przeróbką na twoje potrzeby.

Zapis kroju czcionki do pliku zewnętrznego w Delphi.

const FontFlag : array[0..3] of TFontStyle = (fsBold, fsItalic, fsUnderline, fsStrikeOut); procedure SetFontFlags(Font : TFont; Flags : Integer); var i, mask : Integer; begin mask := 1; for i := Low(FontFlag) to High(FontFlag) do begin if (Flags and mask) <> 0 then Font.Style...

Delphi 2010 - Progr obliczanie pola/obwod figur plaskich projekt

New -> Win32 Application Widzisz formatkę, na niej umieszczasz z przybornika komponentów co chcesz (przyciski, etykiety, pola tekstowe) i sterujesz właściwościami z menedżera obiektów (F11). Tak, jak sterujesz tam poszczególnymi właściwościami, tak samo możesz odwoływać się w kodzie, np.: [syntax=delphi]Label1.Font.Name := 'Arial'; Label1.Font.Color...

[Delphi] Błąd SQLQuery1: Cannot open a non-select statement w Delphi

Utworzyłem sobie testową bazę danych : http://obrazki.elektroda.pl/9418278000_1...

Delphi - Wpisywanie greckich liter i polskich znaków w Labelu

Witam, Kiedyś bawiąc się w programik do rozkodowywania kodów na rezystorach miałem podobny problem (wyświetlanie "omega"). Zrobiłem tak: Na etykiecie gdzie miał być ohm zdefiniowałem font symbol na pozostałych standardowa czcionka. Etykiety ustawione na autosize i programowo układane jedna za drugą. Wszystko na ten temat. Ułatwieniem było to, że znak...

DELPHI - Wielokrotny wydruk zawartości komponentu IMAGE z podaniem współrzędnych

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 stworzyć skaczącą etykietę w Delphi z użyciem timera?

do tego kodu ktory kolega podal wyzej musisz dopisac kod odpowiedzialny za zmiane koloru i rozmiaru czcionki, nie wiem jak to jest w delphi ale prawdopodobnie bedzie tak: Etykieta.Font.Color:=jakis_kolor; Etykieta.Font.Size:=jakas_wielkosc; poszukaj w inspektorze obiektow jak dokladie nazywaja sie odpowiednie wlasciwosci i juz. pomysl troche, to nie...

[Pascal] Pascal – przykładowy kod do komunikacji przez port RS232, jak zacząć?

Posiadam moduliki pascalowe dla Delphi z kodami źródłowymi, jeśli interesuje to mogę wrzucić na forum ( jak znajdę ). [ Ta wiadomość została zmieniona przez: MarioB dnia 2002-03-08 13:19 ]

[Delphi] Procedura zmieniania właściwości komponentów

Twój kod działa - zmienia kolor Editów - więc nie wiem w czym problem, możesz go podpiąć pod zdarzenie OnChange. if (Edit1.Text = '1') and (Edit2.Text ='WYL') then begin Edit3.Color := clRed; Edit2.Color := clRed; end else begin Edit3.Color := clWindow; Edit2.Color := clWindow;» end; Chyba, że chcesz zmienić kolor...

[C++ Builder] Jak zmienić wielkość liter w tekście wczytanym do RichEdit w C++ Builder?

W Delphi wygląda to tak, praktycznie dla każdej kontrolki : Edit1.Font.Name:='Tahoma'; Edit1.Font.Size:=15; Edit1.Font.Color:=clred; Co za tym idzie w C++ Builder, będzie to coś w tym stylu : Edit1->Font->Name='Tahoma'; Edit1->Font->Size=15; Edit1->Font->Color=clred; Problem komplikuje się, jeżeli chcesz np. jedną linię...

[Delhpi] [Delphi][QuickReport] Nieprawidłowy układ liter w podglądzie i eksporcie WMF

Zmień na próbę font w jednej z sekcji, na coś z innej rodziny (nie Arial-o podobny). Zobacz czy efekt będzie taki sam.

TDDI Focus MK1 - Tańsze alternatywy kabli do modyfikacji map EEC V Delphi

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

[delphi] czemu kompilator zmienia indeksy komponentów

OK. Czyli chcesz zrobić dodatkową wersję językową, co wiąże się ze zmianą opisów na ekranie itd. Jeżeli masz aż tyle komponentów, do przerobienia, to może jednak użyj jakiegoś darmowego narzędzia do lokalizacji programów w Delphi. Kiedyś używałem z powodzeniem Balmsoft Poliglot. Ale ten produkt nie był kontynuowany poza Delphi 7. Niestety. Program integrował...

Jak odczytać adres zaznaczonej komórki w Delphi StringGrid?

Może to trochę pomoże: procedure TForm1.FillGrid; var i,j: Integer; begin StringGrid1.DefaultDrawing := False; for i := 0 to StringGrid1.RowCount -1 do for j := 0 to StringGrid1.ColCount -1 do StringGrid1.Cells[ j, i ] := Format('Współ. kom.: K: %d, W: %d', [j, i]); StringGrid1.Repaint; end; procedure...

Delphi 7 - TFormy, Show/Hide , Kolor Tekstu w Buttonie, Show Message

1. No w procedurze obsługi zdarzenia OnClick. 2. Da się. Po prostu piszesz kod wyświetlający okno dialogowe / zmieniasz właściwości Font przycisku (mała uwaga - w przypadku styli Windows i aplikacji je wspierającej - to nie zadziała).

[DELPHI] Jak zacząć programowanie drukarki etykiet Toshiba SX5 w Delphi?

procedure TForm1.Button1Click(Sender: TObject); begin if Printdialog1.Execute then try with printer do begin begindoc; chart1.PrintPartial(rect({4... canvas.Pen.Color:=clblue; canvas.Pen.Width:=1; canvas.Brush.Style:=bsclear; canvas.Rectangle(rect({45,7...

[Delphi] Jak dodać okno wyboru ścieżki do pliku gg.exe w menu Opcje?

Unit2: object Opcje: TOpcje Left = 192 Top = 114 Width = 510 Height = 298 Caption = 'Opcje' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 144 Top = 48 Width...

Generator czcionek dla wyświetlaczy LCD

http://obrazki.elektroda.pl/3150320100_1... Z uwagi na problemy z generowaniem czcionek do moich projektów opartych na LCD np od Nokii 6610 i 6800 napisałem swój własny programik, który ułatwia tą czynność. Programik (oczywiście darmowy) napisany jest przy użyciu darmowego środowiska Lazarus dostępnego zarówno dla Windowsa jak i dla...

[Delphi] Jak przełączać języki w aplikacji za pomocą przycisku?

mam rozwiazanie w one click Form2.Show; Form1.Hide; tylko teraz jak otworze projekt i chce edytowac unit2 to mi jakies glupoty wyskakuja object Form2: TForm2 Left = 192 Top = 114 Width = 870 Height = 500 Caption = 'Form2' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style...

Tworzenie dynamicznego TTimer i TButton w Delphi bez formy - jak to zrobić?

Dobrze wiec widze, ze tak nie mozna roztrzygnac problemu wiec zamieszczam kawalek kodu: procedure TForm1.FormCreate(Sender: TObject); var Guzik : TButton; Text : TLabel; Czas : TTimer; begin Guzik := TButton.Create(self); Text := TLabel.Create(self); Czas := TTimer.Create(self); with Guzik...

Delphi - Problem z kolorowaniem rekordów w ListView wg zadanych kryteriów

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

Delphi - Błąd przy komunikacji z układem ft232 - FTDI

(at)chisel Testuje i wygląda na to że pomogło :) Zobaczymy jeszcze na innych systemach i komputerach czy wszystko jest ok. Dzięki Mam jeszcze jeden problem i nie wiem po jakie stronie. Czy po stronie programu czy to problem od strony układu ft232. Mianowicie chodzi o odczyt stanu jaki jest na pinie układu FT232. Obecnie jak układ jest podpięty cały...

Delphi MySQL - W Delphi MySQL nie zapisuje w tabeli zmian edytowanych rekordów

Przesyłam zatem zapis tekstowy prostego okna okna wykonującego zapis dokonanych zmian dla potwierdzenia. (nie muszę dodawać że należy zmienić ustawienia dostępu do bazy danych). Pozdrawiam. object Form9: TForm9 Left = 0 Top = 0 Caption = 'Form9' ClientHeight = 397 ClientWidth = 795 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText...

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

OK, odgrzebałem stary projekt, w którym wyświetlałem różne wykresy przy pomocy C++ Buildera. 1. Na odpowiedniej formie programu wstawiamy pusty komponent TImage i nazywamy go np. IMG 2. Najlepiej od razu w konstruktorze dajemy IMG->Picture->Bitmap->PixelForm... Będzie nam później łatwiej operować na pikselach - każdy z nich będzie zajmował...

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

Jak wyświetlić polskie znaki z pliku txt w Delphi memo i stringgrid?

Witam. Mam taki mały problem. Wczytuję z pliku txt jakiś ciąg znaków i wpisuję go do memo lub stringgrida. Problem w tym że polskie znaki wyświetla mi jako "krzaczki" próbowałem zmieniać font.charset ale to nic nie dało. Gdy do memo wpisuję z klawiatury to z polskimi znakami nie ma problemu. o co tu biega, bo ja nie mam zielonego pojęcia??

[DELPHI] Jak eksportować dane z DBGrid do Excela w Delphi 2009?

No cóż respekt dla wiedzy Jeszcze chciałem się dowiedzieć jak zrobić aby nagłówki kolumn również znajdował się w arkuszu i jak dopasować szerokość komórek w exelu do długości danych Tak rozwiązałem to z dopasowaniem długości komórek do długości danych w DBGridzie, a w exelu nie wiem jak to wykonać. procedure dopasuj_komurki; const dodatkowa_dlugosc...

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

Hej! Bardzo prosto da się to zrobić w delphi ... bierzesz kolor formy np. clGreen, później wybierasz w inspektorze TransparentColor na true, i TranspareColorValue na clGreen - forma jest przeźroczysta dla systemu (win2000 wzwyż) zostaje tylko obramowanie, które zaraz usuniemy. następnie bierzesz bordelstyle na bsNone, windowState na wsMaximized i formstate...

[Delphi] Jak skopiować tekst z atrybutami z RichEdit1 do RichEdit2 w Delphi?

Mam trzy pytania, co do RichEdit: 1. Mam problem z przekopiowaniem całego tekstu z RichEdit1 wraz z RichEdit1.DefAttributes.Style:= czyli pogrubiony tekst i dodanie go do RichEdit2 . Używałem różnych funkcji: 1. RichEdit2.Text:=RichEdit2.Text+RichEdit1... 2. RichEdit2.Lines.Text:=RichEdit2.Lines.Te... 3. <delphi>RichEdit2.Lines.Add(RichEd...

[delphi] - TOpenPictureDialog - podgląd plików "niestatndardowych"

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

DELPHI 7 - Czy idzie przesuwać rekordy w Strumieniach?

Witam, \ type TDane = class Nazwa : String[255]; Font : record ................. end; Adres : record Ulica : String[100]; .................. end; Opis : record ................. end; //... reszta rekordu około 30zmiennych end; var Dane : TDane; Buduje sobie jakiś rekord i używając Plików Strumieniowych czy da...

[DELPHI] Uruchamianie programu z usługi systemowej w Windows 7 bez interakcji

Ma ktoś jakiś przykładowy kod z" CreateProcesAsUser" dla delphi bo nie mogę go znalesc:/ Dodano po 2 Próbowałem przenieść kod z procesu na usługę systemową, niestety wystąpiło parę błędów o to kod: unit Unit1; interface uses Windows, Messages, SysUtils,Variants, Classes, Graphics, Controls, SvcMgr, Dialogs, ExtCtrls, Shellapi, IdBaseComponent, IdComponent,...

[C++] Programowanie LPT w Builderze na Windows XP z biblioteką DLPortIO

heya w załączniku: driver getio.sys - kopiujemy do jakiegoś foldera na boku bacikami install_io.bat, remove_io.bat rejestujemy/wywalamy driver w kodzie (tu VC++) ale Builder też Ci to połknie //++ verify direct IO access HANDLE h; h = CreateFile("\\\\.\\giveio", GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if( h == INVALID_HANDLE_VALUE...

[DELPHI] Jak wysłać obrazek do przeglądarki za pomocą HTTPServer?

Wiadomo skąd w końcu nie pierwszy raz jestem na elektrodzie pozatym ten kod działa z tym że dokument html drogą prób i błędów udało mi się zrobić bez zapisu na hdd natomiast obrazki nadal są zapisywane na hdd Dodano po 2 A bo ten kod co napisałeś jest "za remowany". wywale komenty wszystkie i kleje jeszcze raz. Program to jest beta wiec kilka rozwiązań...

Jak zmniejszyć kontrolki i ustawić mniejszy rozmiar tekstu w BCB/Delphi?

Hej! Co do rozmiaru czcionek to klikasz waściwosc Font komponentu a potem wybierasz rozmiar czcionki do wyboru masz min 8 - mozesz tam wpisac z klawiatory co chcesz (zalezy jeszcze od czcionki). Ograniczenie bieze sie miedzy innymi z tad (jak sadze) ze nie ma sensu uzywac czcionek mniejszych od 8 - nic kompletnie nie widac sprobuj sam. co do skalowania...

Jak zmienić czcionkę w Tab Control w WinAPI?

Załączam wygląd mojego TabControla i przykładowego wygenerowanego przez Delphi. http://obrazki.elektroda.net/82_12646262... Moje ma większą czcionkę przy podpisach i wyższe wysokości zakładek. O ile wysokość zakładek można zmienić przez odpowiednie API to fontu nie da się w prosty sposób. Kod do mojej kontrolki: TCITEM tie; hZakladki = CreateWindowEx...

[Delphi] Canvas - płynne rysowanie "w czasie rzeczywistym"

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

Jak wydrukować cały StringGrid w Delphi na wielu stronach?

Szukałem na internecie, ale nie znalazłem nigdzie rozwiązania, wiec piszę tu. Chcę wydrukować zawartość StringGrida, który ma około 100 wierszy. Korzystam z gotowej funkcji, ale drukuje ona tylko jedną stronę, na której nie są wszystkie wiersze ze StringGrida. Próbowałem różnymi sposobami, ale nie udało mi się żeby wydrukować resztę wierszy na nowej...

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

[Turbo Delphi] Optymalizacja funkcji Canvas.LineTo w zegarze analogowym

Witam wszystkich otóż piszę na zaliczenie program zegar analogowy nie powiem bo także przy pomocy internetu i w pewnym momencie stanąłem niby zegar działa ale... Właśnie wskazówki zmieniają długo przy zmianie godziny minuty wszystko zapewne przez funkcji Canvas.LineTo tylko nie wiem czy to można jakoś zastąpić i nie wiem jaką funkcję napisać aby dobrze...

Jak stworzyć kratkę do edycji pikseli w programie do fontów LCD?

JIIIS - to dotyczy nawet WinAPI :) Wszystkie funkcje klasy TCanvas odnajdzie się także w czystym WinAPI. jak sie uprzesz to i w assemblerze sie znajda ;) zartuje, po prostu ze dwa razy napisalem okienka w WinAPI i jak tylko moge to omijam z daleka programy w calosci pisane w nim, a wywolywanie niektorych funkcji w Builderze, czy Delphi to juz inna...

Mini REKLAMA VFD (zegar, DS1820, Bluetooth, Podczerwień)

newmax --> mogę podać tę gotową bibliotekę DLL (napisaną w Pascalu/Delphi) mojej produkcji do tego wyświetlacza, ale ...... ale raczej będzie ona wam koledzy mało przydatna, ponieważ ona współpracuje ze zhakowanym sterownikiem sprzętowym mojej konstrukcji i oprogramowanym przeze mnie. Jeśli ktoś zrobi własny sterownik to moja biblioteka DLL przecież...

Jak sterować innym programem z poziomu programu w Delphi7?

hwnd = FindWindow("Notepad", 0) hMenu = GetSubMenu(GetMenu(hwnd), 0) id = GetMenuItemID(hMenu, 1) SetForegroundWindow(hwnd) SendMessage(hwnd, WM_COMMAND, id, 0) zanim to uruchomisz - postaraj się żeby notatnik był uruchomiony FindWindow() - już wiesz GetMenu() - zwraca uchwyt do menu okna GetSubMenu()...

Delphi7 - Jak dodać napisy i grafikę na obrazie z kamery za pomocą TMediaPlayer?

Jak to się mówi: prosił pan, zrobił sam :). Rozwiązanie okazało się bardzo proste. Tym sposobem można rysować zarówno na TMediaPlayer oraz oknach, pulpicie, itp. Oto główna procedura dla wszystkich, którzy w przyszłości będą mieli z tym problem. Temat uważam za zamknięty. Dziękuję i pozdrawiam... procedure TForm1.Button1Click(Sender: TObject);...

[c++] Jak pogrubić tekst w menu C++ dla opcji Przywróć?

Przykład czegoś takiego można odnaleźć choćby w komponentach "stylu XP", gdzie menu są rysowane ręcznie. Ze względu na fakt, że w WinAPI zajęłoby to jeszcze więcej kodu, zaś kodu z C++ pod ręką nie mam, podaję kod Delphi: {**********************************... { } { Borland Delphi Visual Component Library...