Board index » off-topic » class

2004-10-30 09:40:15 PM
off-topic13
Please,look at the following program:
.386
Locals
jumps
.model flat,stdCall;
mb_ok equ 0
hWnd equ 0
lpText equ offset text
lpCaption equ offset caption
extrn ExitProcess :proc
extrn MessageBoxA :proc
DATA segment use32 public
text db "Happy new academic year",13,10
caption db "Hello Students",0,'$'
DATA ends
code segment use32 public
start:
push mb_ok
push lpCaption
push lpText
push hWnd
call MessageBoxA
CALL ExitProcess
code ends
End start
Assembling this program with tasm32 is ok, but the linker, ilink32, displays the following fatal error: "...additional segment need to be defined in a .DEF file"
Who can explain and solve this error, especially, what is a DEF file ?
I found,that including the class 'code' in only one segment's declaration,will solve the problem.
Please, explain me the reason.
I know that in 16-bit programs,the class directive is an option.
I see that in 32-bits it is a must.I would like to understand the diffrence between these two meanings of class.
Regards,
xyoavx
 

You are using 'simplified' directives and declare two segments, 'DATA'
and 'code'. 'code' is not one of the pre-declared segment names
provided with simplified directives. You have not defined the class
of that segment so it will not be bundled in with the default defined
ones. It therefore needs to be defined somewhere, either in the
source file or in a module definition file.
Change this:
code segment use32 public
To this:
code segment use32 public 'CODE'
To cause it to be grouped into the CODE class of segments.
While you are at it, read up on assembly and investigate the use of
the proc and endp directives.
such as export and import names, DLL's used, segments and their
attributes, stack size and heap size can be defined. The module
definition file has an extension of '.DEF' and is often referred to as
a 'def file'. The help has a section on module definition files.
--------------------------------------
.model flat,stdCall;
Locals
jumps
mb_ok equ 0
hWnd equ 0
lpText equ offset text
lpCaption equ offset caption
extrn ExitProcess :proc
extrn MessageBoxA :proc
DATA segment use32 public
text db "Happy new academic year",13,10
caption db "Hello Students",0,'$'
DATA ends
code segment use32 public 'CODE'
start:
push mb_ok
push lpCaption
push lpText
push hWnd
call MessageBoxA
CALL ExitProcess
code ends
End start
C:\Documents and Settings\Administrator\My Documents\Lookat\q068
Corporation
Assembling file: ques068.ASM
Error messages: None
Warning messages: None
Passes: 1
C:\Documents and Settings\Administrator\My Documents\Lookat\q068
C:\Documents and Settings\Administrator\My Documents\Lookat\q068
. Ed

Hello Ed Mulroy [TeamB]
Thanks a lot for your answer.
I found that instead of writing 'CODE' in this declaration:
code segment use32 public 'CODE'
It could be written here:
DATA segment use32 public 'code'
but not in both declarations !!
So, what is the exact duty of the claas directive in 32-bits ?
Where can I read more about creating and using the module definition file ?
Thanks in advance
xyoavx
"Ed Mulroy [TeamB]" < XXXX@XXXXX.COM >wrote:

{smallsort}

usual Data segment:
DATA segment use32 public 'DATA'
 

You are using an assembler, not a compiler. It will
not hold your hand and whisper hints to you as a
compiler will.
'simplified' directives. The assembler is not
tolerant of the multiple definition.
files.
After reading that look at the Microsoft page for them.
www.shorl.com/gefestytololi
or, in its long form
msdn.microsoft.com/library/en-us/vccore/html/_core_module.2d.definition_files.asp
. Ed

Hi,
I want to create a Class which stores user information such as username,
password etc when the user logs into the project. Please help me out with ur
valuable suggestions
Thanks
 

On 27 Dec 2004, "Antony" < XXXX@XXXXX.COM >wrote:
newsgroup.
--
-Mike (TeamB)
Newsgroup guidelines: www.borland.com/newsgroups/guide.html
 

Antony schreef:
(SHA-1) of the passwords.
Danny
---
 

I have this component with a TMyMaskEdit with some modification of
TMaskEdit, so I need in a Method of TMyMaskEdit (ValidateError) access the
Label in LabelEdit, any ideia?
----------- .cpp -------------
void __fastcall LabelEdit::TMyMaskEdit::ValidateError(void)
{
ShowMessage(MensagemErro);
Label->Color = FSetActiveColor;
// Here I got a error!
//[C++ Error] LabelEdit.cpp(130): E2231 Member LabelEdit::Label cannot be
used without an object
}
----------- .h -------------
class PACKAGE LabelEdit : public TWinControl
{
private:
TColor FColor;
TColor FSetActiveColor;
protected:
TLabel *Label;
class TMyMaskEdit : public TMaskEdit
{
private:
protected:
AnsiString MensagemErro;
void __fastcall SetErrorMessage(AnsiString value);
AnsiString __fastcall GetErrorMessage(void);
virtual void __fastcall TMyMaskEdit::ValidateError(void);
public:
__fastcall TMyMaskEdit(TComponent* Owner);
__published:
__property AnsiString ErrorMessage = {read = GetErrorMessage, write =
SetErrorMessage};
} *Edit;
public:
__fastcall LabelEdit(TComponent* Owner);
__published:
};
 

"Arnaldo Giacomitti Junior" < XXXX@XXXXX.COM >wrote in message
LabelEdit* pointer in order to access them from within TMyMaskEdit. For
example:
class PACKAGE LabelEdit : public TWinControl
{
private:
TColor FSetActiveColor;
//...
protected:
TLabel *FLabel;
//...
class TMyMaskEdit : public TMaskEdit
{
protected:
LabelEdit *FLabelEdit;
virtual void __fastcall ValidateError();
//...
public:
__fastcall TMyMaskEdit(LabelEdit *Owner);
//...
} *FEdit;
field class TMyMaskEdit;
public:
__fastcall LabelEdit(TComponent* Owner);
__fastcall ~LabelEdit();
};
__fastcall LabelEdit::LabelEdit(TComponent* Owner)
: TWinControl(Owner)
{
FEdit = new TMyMaskEdit(this);
//...
}
__fastcall LabelEdit::~LabelEdit()
{
delete FEdit;
}
__fastcall LabelEdit::TMyMaskEdit::TMyMaskEdit(LabelEdit *Owner)
: TMaskEdit(Owner), FLabelEdit(Owner)
{
}
void __fastcall LabelEdit::TMyMaskEdit::ValidateError()
{
//...
FLabelEdit->FLabel->Color = FLabelEdit->FSetActiveColor;
//...
}
Gambit
 

I think you have typed incorret, you want to mean friend class TMyMaskEdit
over field class TMyMaskEdit below, right?
Another doubt my component is a descent of twincontrol, I want to use OnExit
event of twincontrol inside of component but after execute my code it need
to call OnExit event of LabelEdit, you understand me? But if I do it, its
override the OnExit of twincontrol there is a way to contorn this or I need
to change the name of OnExit event of labeledit?
---.h---
__published:
__property TNotifyEvent OnExit = {read=FOnMyExit, write=FOnMyExit};
---.c---
__fastcall LabelEdit::LabelEdit(TComponent* Owner)
: TWinControl(Owner)
{
OnExit = EditOnExit;
}
void __fastcall LabelEdit::EditOnExit(TObject *Sender) // this code not
execute, if I delete the property OnExit it work ok!
{
Label->Color = FColor;
if(FOnMyExit)
FOnMyExit;
}
Thanks for all help!
Arnaldo.
friend class TMyMaskEdit right?

I have done it! Thanks again!
I had used:
__fastcall LabelEdit::LabelEdit(TComponent* Owner): TWinControl(Owner)
{
TWinControl::OnExit = EditOnExit;
}
void __fastcall LabelEdit::EditOnExit(TObject *Sender)
{
Label->Color = FColor;
if(FOnMyExit)
FOnMyExit(this);
}
And in the .H.....
__property TNotifyEvent LabelEdit::OnExit = {read=FOnMyExit,
write=FOnMyExit};
"Arnaldo Giacomitti Junior" < XXXX@XXXXX.COM >wrote in message

"Arnaldo Giacomitti Junior" < XXXX@XXXXX.COM >wrote in message
your own event at all. Also, components should never assign handlers to
their own events. It prevents the user from being able to assign his/her
own handlers. Instead, you should be overriding the virtual methods that
trigger the events. In this case, it would be the DoExit() method, ie:
class LabelEdit : public TWinControl
{
//...
protected:
DYNAMIC void __fastcall DoExit();
//...
};
void __fastcall LabelEdit::DoExit()
{
Label->Color = FColor;
TWinControl::DoExit();
}
Gambit
 

"Arnaldo Giacomitti Junior" < XXXX@XXXXX.COM >wrote in message
Gambit
 

OK, I have do it, and work perfect, another doubt, I have inside of
TWinControl two components TLabel, and TMyMaskEdit is this correct?
If I assign event for this components I am doing the things right? Or have
another approach to do this?
Thanks again!
Arnaldo Giacomitti Junior.
"Remy Lebeau (TeamB)" < XXXX@XXXXX.COM >wrote in message