Ĺadny brzuch
jak sprawdzić jaka jest rozdzielczość
chodzi mi rozdzielczość na monitorze
Np.
jak jest rozdzielczość 1024,768 to żeby pokazał się napis Asdef;)
:cheesy:
Delphi3
Asdef
Nie napisałeś w jakim języku, trudno, napiszę kod w C++, w C++ Builder. Będzie ona wyświetlała w polach Edit aktualną rozdzielczość:
TCanvas &Screen = *new TCanvas(); Screen.Handle = GetDC(0); Edit1->Text = IntToStr(Screen.ClipRect.Width()); Edit2->Text = IntToStr(Screen.ClipRect.Height());
Teraz wystarczy dopisać instrukcję warunkową i już masz to co chciałeś. Kod wymyśliłem w tej chwili, ale sprawdziłem i na 100% działa.
Pozdro for All
gg:4826295 | neohacker@interia.pl
Ja napisałem na twoją prośbę poniższy kod w JavieScript:
<script language="javascript"> if ((screen.height == 768) && (screen.width==1024)) {document.write('<font color="red">Asdef</font><br>'); } document.write('Twoja rozdzielczość: '+screen.width+'x'+screen.height); </script>
p0zDro @LL
[E-mail|gg:4221597|www.google.pl|www.strefa0.glt.pl]Wszystko da się zrobić wystarczy chcieć i móc.
Chodzi mi o Delphi
Asdef
var W,H:Integer;
Begin
W:=Screen.DesktopWidth;
H:=Screen.DesktopHeight;
Koniec;)
---------------------------------
..::NeVeS::.. www.neves.prv.pl
---------------------------------
Życie to śmierć, śmierć to życie.
cytat:NeVeS napisał:
var W,H:Integer;
Begin
W:=Screen.DesktopWidth;
H:=Screen.DesktopHeight;
Koniec;)
---------------------------------
..::NeVeS::.. www.neves.prv.pl
---------------------------------
Życie to śmierć, śmierć to życie.
tylko te instrukcja nie chodzi pod Delphi3 :cry: ale to szczeguł;)
ale czy byś mógł dopisać do tego jak wykonać instrukcję jak dopiero jak będzie rozdzielczość 1024,768
Asdef
cytat:Asdef napisał:
ale czy byś mógł dopisać do tego jak wykonać instrukcję jak dopiero jak będzie rozdzielczość 1024,768
Asdef
Wprawdzie to nie do mnie, ale skoro już tu jestem ....;)
if W = 1024 and H = 768 then Begin Label1.Caption := "Asdef"; End;
Pozdro for All
gg:4826295 | neohacker@interia.pl
dzięki wszystkim 8)
jest już OK.
Asdef
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
chodzi mi rozdzielczość na monitorze
Np.
jak jest rozdzielczość 1024,768 to żeby pokazał się napis Asdef;)
:cheesy:
Delphi3
Asdef
Nie napisałeś w jakim języku, trudno, napiszę kod w C++, w C++ Builder. Będzie ona wyświetlała w polach Edit aktualną rozdzielczość:
TCanvas &Screen = *new TCanvas(); Screen.Handle = GetDC(0); Edit1->Text = IntToStr(Screen.ClipRect.Width()); Edit2->Text = IntToStr(Screen.ClipRect.Height());
Teraz wystarczy dopisać instrukcję warunkową i już masz to co chciałeś. Kod wymyśliłem w tej chwili, ale sprawdziłem i na 100% działa.
Pozdro for All
gg:4826295 | neohacker@interia.pl
Ja napisałem na twoją prośbę poniższy kod w JavieScript:
<script language="javascript"> if ((screen.height == 768) && (screen.width==1024)) {document.write('<font color="red">Asdef</font><br>'); } document.write('Twoja rozdzielczość: '+screen.width+'x'+screen.height); </script>
p0zDro @LL
[E-mail|gg:4221597|www.google.pl|www.strefa0.glt.pl]Wszystko da się zrobić wystarczy chcieć i móc.
Chodzi mi o Delphi
Asdef
var W,H:Integer;
Begin
W:=Screen.DesktopWidth;
H:=Screen.DesktopHeight;
Koniec;)
---------------------------------
..::NeVeS::.. www.neves.prv.pl
---------------------------------
Życie to śmierć, śmierć to życie.
cytat:NeVeS napisał:
var W,H:Integer;
Begin
W:=Screen.DesktopWidth;
H:=Screen.DesktopHeight;
Koniec;)
---------------------------------
..::NeVeS::.. www.neves.prv.pl
---------------------------------
Życie to śmierć, śmierć to życie.
tylko te instrukcja nie chodzi pod Delphi3 :cry: ale to szczeguł;)
ale czy byś mógł dopisać do tego jak wykonać instrukcję jak dopiero jak będzie rozdzielczość 1024,768
Asdef
cytat:Asdef napisał:
ale czy byś mógł dopisać do tego jak wykonać instrukcję jak dopiero jak będzie rozdzielczość 1024,768
Asdef
Wprawdzie to nie do mnie, ale skoro już tu jestem ....;)
if W = 1024 and H = 768 then Begin Label1.Caption := "Asdef"; End;
Pozdro for All
gg:4826295 | neohacker@interia.pl
dzięki wszystkim 8)
jest już OK.
Asdef