110 lines
3.3 KiB
D
110 lines
3.3 KiB
D
|
/* MinWin Label class
|
||
|
|
*
|
||
|
|
* Static text label
|
||
|
|
*
|
||
|
|
* Written by Ben Hinkle and released to the public domain, as
|
||
|
|
* explained at http://creativecommons.org/licenses/publicdomain
|
||
|
|
* Report comments and bugs at dsource: http://www.dsource.org/projects/minwin
|
||
|
|
*/
|
||
|
|
|
||
|
|
module minwin.label;
|
||
|
|
|
||
|
|
public import minwin.component;
|
||
|
|
|
||
|
|
private {
|
||
|
|
import minwin.app;
|
||
|
|
import minwin.window;
|
||
|
|
import minwin.peerimpl;
|
||
|
|
import std.string;
|
||
|
|
import minwin.logging;
|
||
|
|
}
|
||
|
|
|
||
|
|
version (MinWin32) {
|
||
|
|
|
||
|
|
private import minwin.mswindows;
|
||
|
|
|
||
|
|
template LabelPrefSizeImpl() {
|
||
|
|
Point preferredSize() {
|
||
|
|
HDC dc = GetDC(peer);
|
||
|
|
sysAssert(dc !is null, "Failed to get label DC in preferredSize");
|
||
|
|
SIZE s;
|
||
|
|
try {
|
||
|
|
Font f = standardFont(StandardFont.Gui);
|
||
|
|
HFONT oldfont = SelectObject(dc,f.peer);
|
||
|
|
sysAssert(oldfont !is null, "Failed to get Label font in preferredSize");
|
||
|
|
BOOL ok = GetTextExtentPoint32X(dc,text_data,text_data.length,&s);
|
||
|
|
SelectObject(dc,oldfont);
|
||
|
|
sysAssert(ok != false, "Failed to get font extents in preferredSize");
|
||
|
|
} finally {
|
||
|
|
ReleaseDC(peer,dc);
|
||
|
|
}
|
||
|
|
POINT p;
|
||
|
|
p.x = s.cx;
|
||
|
|
p.y = s.cy;
|
||
|
|
if (userPreferredWidth > 0)
|
||
|
|
p.x = userPreferredWidth;
|
||
|
|
if (userPreferredHeight > 0)
|
||
|
|
p.y = userPreferredHeight;
|
||
|
|
return toPoint(p);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
class Label : WindowChild {
|
||
|
|
private char[] text_data;
|
||
|
|
this(Component parent, char[] text, char[] name = "") {
|
||
|
|
PeerForAdd parentp = parent.getPeerForAdd();
|
||
|
|
peer = CreateWindowX("STATIC",text,
|
||
|
|
SS_LEFTNOWORDWRAP | WS_CHILD | WS_VISIBLE,
|
||
|
|
0,0,10,10,parentp,
|
||
|
|
cast(HMENU)0,gApp.hInstance,null);
|
||
|
|
sysAssert(peer !is null, "Failed to create peer Label");
|
||
|
|
this.name = name;
|
||
|
|
text_data = text;
|
||
|
|
Font f = standardFont(StandardFont.Gui);
|
||
|
|
SendMessageA(peer,WM_SETFONT,cast(WPARAM)f.peer,0);
|
||
|
|
setWindowChildPeer(this,peer,OWNS_PEER);
|
||
|
|
parent.addChild(this);
|
||
|
|
}
|
||
|
|
char[] text() {return text_data;}
|
||
|
|
void text(char[] c) {
|
||
|
|
text_data = c;
|
||
|
|
SendMessageX(peer,WM_SETTEXT,0,c);
|
||
|
|
}
|
||
|
|
mixin LabelPrefSizeImpl!();
|
||
|
|
mixin WindowChildImpl!();
|
||
|
|
}
|
||
|
|
|
||
|
|
} else version (GTK) {
|
||
|
|
|
||
|
|
private import minwin.gtk;
|
||
|
|
private import std.c.string;
|
||
|
|
|
||
|
|
class Label : WindowChild {
|
||
|
|
this(Component parent, char[] text, char[] name = "") {
|
||
|
|
PeerForAdd parentp = parent.getPeerForAdd();
|
||
|
|
this.name = name;
|
||
|
|
char* str = toStringz(text);
|
||
|
|
peer = gtk_label_new(str);
|
||
|
|
gtk_container_add(cast(GtkContainer*)parentp,peer);
|
||
|
|
setWindowChildPeer(this,peer,OWNS_PEER);
|
||
|
|
parent.addChild(this);
|
||
|
|
gtk_widget_realize(peer);
|
||
|
|
visible = true;
|
||
|
|
}
|
||
|
|
|
||
|
|
mixin WindowChildImpl!();
|
||
|
|
|
||
|
|
char[] text() {
|
||
|
|
char* str = gtk_label_get_text(cast(GtkLabel*)peer);
|
||
|
|
if (str is null)
|
||
|
|
return "";
|
||
|
|
else
|
||
|
|
return str[0..strlen(str)].dup;
|
||
|
|
}
|
||
|
|
|
||
|
|
void text(char[] c) {
|
||
|
|
gtk_label_set_text(cast(GtkLabel*)peer,toStringz(c));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|