C++ Replacement or similar keywords for 'is' and 'as' Delphi keys.

hello there,

i am a newcomer to C++ Builder so excuse any mistake.

My question is (maybe a stupid question)

My first language is Delphi and i usually use this type of sentences:

if Sender is TEdit then (Sender as TEdit).Text := '';

A replacement or similar keywords exist for C++ Builder?

Thanks in advance.
0
finneas
9/27/2010 11:37:55 AM
embarcadero.cppbuilder.cpp 2803 articles. 0 followers. Follow

4 Replies
1055 Views

Similar Articles

[PageSpeed] 27

Am 27.09.2010 13:37, schrieb finneas finn:

> A replacement or similar keywords exist for C++ Builder?

TEdit * Edit;
if ((Edit = dynamic_cast<TEdit*>(Sender)) != 0)
{
	Edit->Text = "";
}

Christian
0
Christian
9/27/2010 11:42:29 AM
Il Mon, 27 Sep 2010 04:37:55 -0700, finneas finn <> ha scritto:

>hello there,
>
>i am a newcomer to C++ Builder so excuse any mistake.
>
>My question is (maybe a stupid question)
>
>My first language is Delphi and i usually use this type of sentences:
>
>if Sender is TEdit then (Sender as TEdit).Text := '';
>
>A replacement or similar keywords exist for C++ Builder?
>
>Thanks in advance.


if ( TEdit* const Edit = dynamic_cast<TEdit*>( Sender ) )
    Edit->Text = "";

Regards.

Giuliano
0
Giuliano
9/27/2010 12:38:58 PM
> {quote:title=Christian Gudrian wrote:}{quote}
> Am 27.09.2010 13:37, schrieb finneas finn:
> 
> > A replacement or similar keywords exist for C++ Builder?
> 
> TEdit * Edit;
> if ((Edit = dynamic_cast<TEdit*>(Sender)) != 0)
> {
> 	Edit->Text = "";
> }
> 
> Christian

Thanks Christian for your quick answer.
0
finneas
9/27/2010 1:48:45 PM
> {quote:title=Giuliano . wrote:}{quote}
> Il Mon, 27 Sep 2010 04:37:55 -0700, finneas finn <> ha scritto:
> 
> >hello there,
> >
> >i am a newcomer to C++ Builder so excuse any mistake.
> >
> >My question is (maybe a stupid question)
> >
> >My first language is Delphi and i usually use this type of sentences:
> >
> >if Sender is TEdit then (Sender as TEdit).Text := '';
> >
> >A replacement or similar keywords exist for C++ Builder?
> >
> >Thanks in advance.
> 
> 
> if ( TEdit* const Edit = dynamic_cast<TEdit*>( Sender ) )
>     Edit->Text = "";
> 
> Regards.
> 
> Giuliano

and Thanks Giuliano too.
0
finneas
9/27/2010 1:51:11 PM
Reply:

Similar Artilces:

''''''''''''''''''''
Name: haznen Email: haznenatyahoodotcom Product: Gran Paradiso Alpha 8 Summary: '''''''''''''''''''' Comments: '''''''''''''''''''''''''''''''''''' Browser Details: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9a1) Gecko/20061204 UGES/1.7.2.0 GranParadiso/3.0a1 From URL: http://www.mozilla.org/projects/granparadiso/ Note to readers: Hendrix gives...

'''''
Name: mario Email: ramar17atfastwebnetdotit Product: Gran Paradiso Alpha 2 Summary: ''''' Comments: K: Browser Details: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9a2) Gecko/20070206 GranParadiso/3.0a2 ...

'do' won't 'do' if '/'
Greetings to All from Au, Have a NetWare Perl 5.8.4 and wanted to tweak File\Spec\NW.pm to try and standardise on '/' separators. If I run a test script (t/uni/lower.t) with an unmodified NW.pm, it calls t/uni/case.pl, that, in case.pl, (when the path separators are '\'), the $file is '..\lib\unicore\To\Lower.pl' and the following code portion works, with $simple getting a returned table: sub casetest { my ($base, $spec, $func) = @_; my $file = File::Spec->catfile(File::Spec->catdir(File::Spec->updir, "lib", &qu...

'''
Name: L Lachowsky Email: e2brutus_10atyahoodotcom Product: Firefox Summary: ''' Comments: why duddn this surprise me... I change default server from IE to Mozilla, and then i get error messages. well, shud I decide to not get on my computer with Mozilla..or shud I risk security breeches with IE....hmmm at least i can get on the internet with IE Browser Details: Mozilla/5.0 (Windows; U; Windows NT 6.0; en-US; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5 From URL: http://hendrix.mozilla.org/ Note to readers: Hendrix gives no expectation of a response to this fee...

Cast from type ''''DBNull'''' to type ''''String'''' is not valid.
How do I avoid getting this error: Cast from type ''''DBNull'''' to type ''''String'''' is not valid. I am trying to get values from the database into a form for updating using a Datareader, SQL is set to allow nulls for certain fields as they are not required but the only way I can get the form to display is by adding a space in SQL. Is there another way around this? Check if it is equal to DBNull.Value first and if it is, don't do the cast.Stanley Tan theSpoke Blog Where in the code does it need to go? I am using the following and it's the profile that isn't always requi...

table_info('','','','%') cannot return any types
I was recently confirming table_info special cases and discovered the case for getting table_types cannot work. table_info('','','','%') should return a list of table types but it returns a list of empty strings instead: my @types = $h->tables('', '', '', '%'); print "all types:\n", join("xxx\n", @types), "\n"; # should output something like: # "dbo" # "INFORMATION_SCHEMA" # "sys" # and actually outputs: xxx xxx It seems to be down to the following ...

LINQ -- how to do where x in ('a', 'b','c')
How do I write a LINQ expression that does the following: select * from SomeTable where SomeColumn in ('a', 'b','c')  Jay There is no IN operator in LINQ (yet), but you can use Contains instead: http://www.devauthority.com/blogs/jwooley/archive/2007/08/06/69922.aspx Jos...

SQL replace '-' by ''
Hi all i have a question regarding sql, i want to replace some characters...   any knows simply how to do this?   I want to replace "999-25000-69" by "9992500069"   grtzDon't forget to click "Mark as Answer" on the post that helped you. SELECT Replace('999-25000-69','-', '') or SELECT Replace(col1,'-', '') as col1 FROM yourTableLimno...

'b'..'a'
Hello. I'm using defferent 5.6.0's for Win32. I wonder wheter following behaviour is intentional or not: d:\>perl -e "print 'b'..'c'" bc d:\>perl -e "print 'b'..'a'" bcdefghijklmnopqrstuvwxyz I expected empty list in latter case, like in perl -e "print 'bb'..'a'" <!ENTITY Vadim REALLIFE "Vadim V.Konovalov, St.Petersburg, Russia"> &Vadim; On Wed, Sep 20, 2000 at 03:14:41PM +0400, Konovalov, Vadim wrote: > Hello. > > I'm using defferent 5.6.0'...

'IN' Clause or 'OR'
Hello, [1]: select * from TABLEA where COL1 IN('value1','value2''valu3'....) [2]:select * from TABLEA where COL1 = 'value1' OR COL1= 'value2' OR COL1='valu3'. TABLEA is a huge table and it has non-clustered index on COL1. Among the above 2 queries, which query will give me the better performance or fast response and WHY? What is the difference between 'IN' and 'OR' clauses as for as Sybase Optimization is concerned. Which is the better one to be used on huge tables. Thanks. Mac An IN list is treated ...

'or' or 'union'
Hello I was just wondering, in general what is better to use, an 'or' clause in a select or a 'union' to join two selects together. Do both statements create work tables? Many thanks Alex I think OR will be better than union. because suppose u have 3 tables and using OR u can join table a and table b and table c so each table will have only one read. but using union you will join table a and table b and in another query of union u will use table (a or b) and table c so ur one read is more in union . Ramdas Alex Cheung wrote: > Hello > >...

Key 'd' and Key 'Control'
Dear sirs / madams, I want to add a short cut key in my datawindow, the script as shown as below, Script 1 IF KeyFlags = 2 THEN IF KeyDown(Keyd!) THEN THIS.TriggerEvent("ue_deleterow") END IF END IF Script 2 IF KeyDown(KeyControl!) then IF KeyDown(Keyd!) then THIS.TriggerEvent("ue_deleterow") END IF END IF Script 3 IF KeyDown(KeyControl!) AND KeyDown(Keyd!) THEN THIS.TriggerEvent("ue_deleterow") END IF But, all of the above, if I press the Key 'Control' first, and then press Key 'd',...

'To', 'CC', & 'BCC'
Name: Dick Tracy Email: philipdottracyatoptusnetdotcomdotau Product: Thunderbird Summary: 'To', 'CC', & 'BCC' Comments: I have just started using Thunderbird and while I find it quite excellent- I suggest having a button to add addressees to 'BCC' as well. Currently each 'BCC' addressee has to be selected manually. I send e-mail to quite a number of people at a time and I do not wish to readily spread others addresses easily. Browser Details: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8.1.6) Gecko/20070725 Firefox/2.0....

'Value' should be between 'minimum' and 'maximum'.
I'm attempting to invoke with parameters:  Dim thing2 As New mydelsubPBStep(AddressOf pbStep) Me.Invoke(thing2, "setMax", dt.Rows.Count)      <---- this is where the error occurs   the delegate looks like this: Private Delegate Sub mydelsubPBStep(ByVal mode As String, ByVal value As Integer)   the function it's calling looks like this:Private Sub pbStep(ByVal mode As String, ByVal value As Integer) Select Case mode.ToLower Case "clear" ProgressBar1.Value = 0 Case "step" ProgressBar1.PerformStep() L...

Web resources about - C++ Replacement or similar keywords for 'is' and 'as' Delphi keys. - embarcadero.cppbuilder.cpp

Resources last updated: 1/21/2016 4:00:37 PM