-=-
.
.....
  
| messages |
 
RSS
Direkomendasikan menggunakan brower Opera/Chrome/Firefox. Resolusi minimal 1024x768 | Powered by ____ |
 
KiOSS.Com
  
| Switch to Default View |
  
Nikmati Delphi-ID dalam berbagai versi tampilan :
Basic View (LOW Bandwidth)
Default View (Full)
Mobile Edition
Main Menu
..:: onWebTools ::..
..:: onLastPosts ::..
goto Postjumlah komponen maksimal dalam sebuah project(6)
 by d4mnf1y32
 on 21.May at 12:16
goto Posttanya grayscale to biner dengan scanline(1)
 by luckynvic
 on 20.May at 20:44
goto Posttanya looping biner to matriks(1)
 by luckynvic
 on 20.May at 20:10
goto Postsql error:acces denied for user....(2)
 by nasbms
 on 19.May at 16:54
goto Postpemanggilan frame(4)
 by nasbms
 on 19.May at 16:14
goto Posttanya AvLock(0)
 by azuriza
 on 19.May at 11:24
goto PostGet TDBEdit Value Menggunakan LookUp Grid(10)
 by henry_sys
 on 18.May at 11:27
goto Postmenghitung record dalam perulangan(4)
 by idhiel
 on 16.May at 13:53
goto Posttanya ascii(4)
 by mas_kofa
 on 16.May at 12:11
goto PostRawPrint Untuk Delphi XE2(0)
 by adewijaya
 on 15.May at 22:34
goto Postdatabase error..(4)
 by idhiel
 on 15.May at 15:57
goto Postbekasi, pt arila putra mahkota(3)
 by mas_kofa
 on 15.May at 15:37
goto Postbagaimana cara membaca file *.doc dg delphi?(0)
 by ficky
 on 15.May at 06:14
goto Posttanya biner to matriks(13)
 by diandewi
 on 14.May at 20:30

..:: onLast Articles ::..
..:: New Download ::..
Pascal-id.Org
Feeds -  Popular -  Latest
RE: The Longue
8 months, 3 weeks ago
RE: belajar pascal
8 months, 3 weeks ago
RE: The Longue
8 months, 3 weeks ago
RE: belajar pascal
8 months, 3 weeks ago
RE: Perkenalan dan Absen
8 months, 3 weeks ago
RE: Alhamdulillah Buka Puasa Bersama
8 months, 3 weeks ago
RE: تَقَبَّلَ اللهُ مِنَّا وَمِنْكَ - Selamat Hari Raya Idul Fitri
8 months, 3 weeks ago
Lintas Situs
«
free web site stats and visitor tracking
•   Forum FAQ  •  Search  • 

Resolusi program
Delphi Indonesia Forum Index » Pemrograman » Multimedia & Graphic Enhancement
Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic
Author Message
erlkOffline
Location:
5 Post subject: Resolusi program  PostPosted: 04/Jul/2006 20:19
onNewBie


Joined: 03-Mar-2006
Posts: 2

Status: Offline
Ane bikin program di komputer dengan resolusi 1024 X 768, namun pas di jalanin di komputer temen, tampilnya jadi 1/2nya, nah kira2 ada nyang tau gimana caranya program ntu ngikutin resolusi layar monitor yang berbeda??
please klo ada nyang tau cepetan kasi tau ya.... Sad
 
 View user's profile Send private message  
Reply with quote Back to top
ZeALOffline
Location:
Post subject:   PostPosted: 05/Jul/2006 07:47
onProfessional


Joined: 07-Apr-2005
Posts: 763

Status: Offline
Coba liat2 di torry.net, terakhir gue liat banyak komponen yang bisa otomatis nge-resize tanpa perlu otak-atik terlalu banyak...

_________________
do i know you?

[ My Blog : http://www.monyetpinter.com ] [ My RPG Project : http://einarc.wordpress.com ] [ FJBex : http://www.fjbex.com ]
 
 View user's profile Send private message  
Reply with quote Back to top
regolOffline
Location:
Post subject:   PostPosted: 28/Nov/2006 12:57
onBeginner


Joined: 25-Nov-2006
Posts: 5

Status: Offline
uses typinfo;

const
ScreenWidth: LongInt = 1024; ScreenHeight: LongInt = 768;
procedure TFlogin.FormCreate(Sender: TObject);
var
i: integer;
begin
scaled := true;
if (screen.width <> ScreenWidth) then
begin
height := longint(height) * longint(screen.height) DIV ScreenHeight;
width := longint(width) * longint(screen.width) DIV ScreenWidth;
scaleBy(screen.width, ScreenWidth);
// end;

for i := componentCount - 1 downto 0 do
with components do
begin
if GetPropInfo(ClassInfo, 'font' <> nil then
font.size := (screen.Width DIV screenwidth) * font.size;
end;
end;
end;
 
 View user's profile Send private message  
Reply with quote Back to top
Display posts from previous:     
Jump to:  
All times are GMT - 12 Hours
Post new topic   Reply to topic
View previous topic Printable version Log in to check your private messages View next topic
 Delphi Indonesia Forum Index » Pemrograman »  Multimedia & Graphic Enhancement





Powered by PNphpBB2 © 2003-2009 The Zafenio Team
Credits


| Register | Lost Password ? |