Casa
Top.Mail.Ru Yandeks.Metrika
Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];
abajo

Diálogo y dll Encontrar ramas similares


DNT (2001-12-15 16:20) (1)

Ребята, как запихнуть диалог AboutBox в dll и затем вызвать из программы?


MARCODEN (2001-12-15 17:27) (1)

Инструкции + пример:

1. File -> New -> DLL
2. File -> New Form

Для вызова формы из другого приложения нужно создать её динамически, т.к. обычные механизмы Дельфи не работают в DLL библиотеках. Поэтому надо описать новую процедуру:
procedimientos ShowMyForm(AOwner: TComponent);
var MyForm: TForm2;
comenzar
MyForm:=TForm2.Create(AOwner);
MyForm:=ShowModal;
MyForm.Free;
fin;

Включим созданную процедуру в список экспорта:
las exportaciones ShowMyForm;

Теперь переключимся на проект Project2.exe и укажем новую импортированную процедуру:
procedimientos ShowMyForm(AOwner: TComponent);
externo "Project1.dll";

Потом можешь создавать обработчик, например:
procedimientos
comenzar
ShowMyForm(Self);
fin;


DNT (2001-12-15 17:43) (1)

Gracias!



Páginas: 1 rama entera

Foro: "Principal";
Archivo actual: 2002.01.08;
Descargar: [xml.tar.bz2];

arriba















Memoria: 0.81 MB
Tiempo: 0.04 c
6-22278
garaje
2001-10-02 12:27
2002.01.08
Dime el algoritmo para reemplazar letras grandes con letras pequeñas.


3-21913
SklifF
2001-12-03 19:08
2002.01.08
Про суммирование столбцов


14-22372
froz
2001-11-08 16:25
2002.01.08
URGENTEMENTE


1-22158
Praco
2001-12-20 16:29
2002.01.08
TCustomGrid y todos sus descendientes ...


1-22176
Serg5
2001-12-20 14:57
2002.01.08
De nuevo, el problema con el texto: muestro Image1.Canvas.TextOut, pero debajo del texto mismo hay un corredor blanco. ¿Es posible que si no elimina (solo coloque las letras), al menos haga que el corredor sea negro?





africaans albanés Arabic armenio Azerbaiyán vasco Bielorruso Bulgarian Catalán Chino (simplificado) Chino (tradicional) Croata Checo Danés Dutch Inglés Estonia filipina Finnish Francés
gallego georgiano Alemán Griego criollo haitiano hebreo hindi Húngaro islandés Indonesian irlandés Italiano Japonés Korean letón lituano macedonio Malay maltés Noruego
persa polaco Portuguese rumano Ruso Serbio Slovak Esloveno Español swahili Sueco Thai turco ucranio Urdu vietnamita galés yídish bengalí bosnio
cebuano esperanto gujarati hausa hmong igbo javanés kannada khmer lao latín maorí marathi mongol nepali punjabi somalí Tamil telugu yoruba
zulú
Английский Francés Alemán Italiano portugués Русский Español