ivantu ,
Достаточно лаконично?
CODE:messagebox_("Сообщение ^nВот такое", "Что-то скопировать");
function messagebox_(string text, string copy_text)
{
int xw,yw,col;
int xr=310,yr=100;
getdisplay(col,xw,yw);
int pos_size_button0[1][4];
string text_button0[1];
int flag_button0[1];
pos_size_button0[0][0]=183; pos_size_button0[0][1]=44; pos_size_button0[0][2]=100; pos_size_button0[0][3]=20;
text_button0[0]="OK";
//////////
int pos_size_edit0[1][4];
string text_edit0[1];
pos_size_edit0[0][0]=10; pos_size_edit0[0][1]=44; pos_size_edit0[0][2]=159; pos_size_edit0[0][3]=20;
text_edit0[0]=copy_text;
//////////
int pos_size_static0[1][4];
string text_static0[1];
pos_size_static0[0][0]=12; pos_size_static0[0][1]=8; pos_size_static0[0][2]=278; pos_size_static0[0][3]=30;
text_static0[0]=text;
//////////
createdialog(0, BUTTON, #pos_size_button0[0][0], #text_button0[0], #flag_button0[0] |
EDIT, #pos_size_edit0[0][0], #text_edit0[0] |
STATIC, #pos_size_static0[0][0], #text_static0[0]);
//////////
showdialog(0, "Messagebox", xw/2-xr, yw/2-yr, xr, yr, 1, 1);
//////////
while(flag_button0[0]==0) sleep(10);
} |