Szöveg kimenet vászon Delphi - verem túlcsordulás az orosz

Azt kell mondanom, hogy ez nem minden, hogy lehet tenni a script grafikus módban: valahol (nem emlékszem pontosan hol, talán egy nagy bázis tudom Delphi) láttuk, hogy lehet változtatni a zsír, magasság, és valami mást a font .







És valami ilyesmi, azt hiszem, meg tudjuk csinálni:

  1. A onMouseMove kezelőjét kép felvázolása a szövegdoboz (egyfajta zászló, és rendelje hozzá az igazság);
  2. Esemény billentyűk írni az ő szövege (ha flag = true), ha a kulcs = az Enter teljes hozzájárulását (rendelt zászló hamis és felvázolni a keret, de ez a keret törölt rendesen szükséges 2 komponens kép: az egyik minden rajzolni és jelölje ki (ez lehet átlátszó (átlátszó = True, a színtranszparenciát - alapértelmezés szerint - az első legalacsonyabb pontja fényképek komponens))). Megpróbálok csinálni, de még nem ígérnek.

Úgy tűnik, hogy valami ehhez hasonlót (típus átlátszó Memo mező (RichEdit is megy helyette Memo)). Azt kell mondanom, hogy van egy hátránya: lehetetlen változtatni a méretét az egér (lehet gondolni, hogyan kell csinálni, de nincs időm).

  1. Projekt létrehozása dobás 2 Image komponens (az első, a másik), úgy, hogy ugyanaz volt a mérete és egy laikus csak alul a többi, nos, SpeedButton gomb (AllowAllUp = True, GroupIndex = (nem nulla)).
  2. Hozzáadott formájában projektek, amelyek esetében és dobja Memo vagy RichEdit.
  3. Stretch ezeket a komponenseket az egész formában (Align = alClient).
  4. Mi meg az űrlap tulajdonság Átlátszó = true és TransparentColor választhat bármilyen színű (de nem az egyetlen, amely lehet szöveg, de a szoftver is meg lehet változtatni, természetesen, ha szükséges).
  5. Abban RichEdit alkatrész vagy Memo háttérszín beállítása, például TransparentColor formában.






A fejlesztés a formákat lehet tenni re, - folytassa a kódolás (röviden ismertesse):

  1. Válasszon egy téglalap alakú területet onMouseMove fényképek felvezető komponenst.
  2. Ezután a felvezető onmouseup megmutassuk második formája is.
  3. Írunk szöveget, fedél Enter megnyomásával.

Ezután remélhetőleg minden lesz a kód egyértelmű.

KÓD fő formája (a másik viszont semmi nem írt, csak a tulajdonságait beállítani!):

Ezt megteheti:

  1. Feldolgozása után az esemény mouseclick kép, ha rákattint memorizálni a helyzetben, ahol kattintott (X1, Y1)
  2. További eljárás MouseButtonDown esemény (egyfajta), rajzoljon egy doboz az X1, Y1 a jelenlegi egér pozícióját, és persze emlékszem X2, Y2
  3. MouseButtonUp dolgozza fel az eseményt, azaz a amikor a gomb elengedésekor akkor automatikusan létrejön RichEdit elem X1, Y1, méret beállítása X2, Y2, határokon meghatározott tulajdonságok - hiányzik, és a fókusz rajta.
  4. Beállításához RichEdit, feldolgozza a kimeneti esemény belőle, azaz, ha a kapcsolót a vásznon, akkor az érték a RichEdit rekord változó: string, és ezután kiadja a változó Canvas TextOut funkció az X1, Y1, vagy jól, a közepén a téglalap a X1, Y1 X2, Y2

Delphi nem éri meg, így nem tudok példát), de ez a fajta logika) Légy kreatív)

Válaszol szeptember 18 '11 at 07:56

Szöveg kimenet vászon

Válaszol szeptember 18 '11 at 07:54

Itt például, a szöveget a kép Edit'a Image1 fekete és átlátszó, vagyis a háttér lesz.

Válaszol szeptember 18 '11 at 07:56




Kapcsolódó cikkek