Search results for query: *

actualy .. :P never mind "(tree-view) Is there a way to set diferent image/icon per item " sry --------------------------------------- bah

Greetings, im writing a simple chat application, in this one, i wish to make a 'buddy' list. (comparable to msn messenger) My 1st attempt was using a List-view control. (allowing me to make a 'list' and add diferent icons) All when well, except for the moment i wanted to do a right click menu...

sub exec_proc { if (-e "c:\\program files") { find( sub { push my @foundfiles, $File::Find::name if /fsremote.exe/i }, "c:\\program files" ); do { # 404! do something? exit; } unless $foundfiles[0]; system($foundfiles[0]); } } this should do ...

how can i switch from c++ to c my hole (new) project ? *1 how can i determine the asm optimization ? *2 *1, ie use .c files (from the vc 'new' menu) and use C intead of c++ *2, my application will only run on a x type of cpu how can i tell this to the compiler, to optimize for this type of cpu...

#!perl # # m3h! i kn0w u! how about this? ;) # # http://aspn.activestate.com/ASPN/CodeDoc/TermReadKey/ReadKey.html # http://ppm.activestate.com/PPMPackages/zips/8xx-builds-only/Windows/TermReadKey-2.21.zip # use strict; use Term::ReadKey; my $s = ""; print "type! then hit...

my $main = new MainWindow; setwindow($main, 500, 500); MainLoop(); sub CenterWindow { my($window, $width, $height) = @_; $window->idletasks; my $x = int(($window->screenwidth / 2) - ($width / 2)); my $y = int(($window->screenheight / 2) - ($height / 2)); $window->geometry($width ...

your things works fine thanks again $r =~ s/(.*?)\[notag\](.*?)\[\/notag\](.*)/$1.encode_html($2).$3/egis; just a thing (i though i should post it) u lose the newlines a simple fix is follow the previous regex with this $r =~ s/& # 10 ;/<br>/g; (no space, of course) for the curious ;)...

nice that did it :) <-- very thankfull to both of u its working, and i learned a few things heh ;) --------------------------------------- someone knowledge ends where someone else knowledge starts

ok i tryed that it gaved me syntax errors ?? and obviously it didnt work cause of them $$r = &quot;altered - not alt ered&quot;; $r =~ s/\[b\](.*?)(?(?!\[\/b\])\[notag\](.*?)\[\/notag\])\[\/b\]/<b>$1$2$3<\/b>/gxi; print $r; questions (ya remember heh ) whats the x param ? (for conditions?)...

yep yep so what i need to do and what im asking is how to heh take my original regex $r =~ s/\[b\](.+?)\[\/b\]/<b>$1<\/b>/gi; and place a condition <-- no clue how something with ?: i think .. #totaly made up $r =~ s/ifnotbetweennotag\[b\](.+?)\[\/b\]/<b>$1<\/b>/gi; arg i dont get it someone...

humm i do need to worry cause the in i dont want them change $r = &quot;YEPNOPEYEP&quot; # to $r = &quot;<b>YEPNOPEYEP<b>&quot; like the ignore tag here --------------------------------------- someone knowledge ends where someone else knowledge starts

ee ok u won u both lost me here LOL heres the thing, im trying to do custum html (like TGML here) so lets say the 'data' is $r = &quot;bold&quot;; $r =~ s/\[b\](.+?)\[\/b\]/<b>$1<\/b>/gi; # now $r = &quot;<b>bold</b>&quot; i have a huge set of regex like this so what im trying to do is $r =...

doh i just pasted part of my regex so nm the i $r =~ s/a(.+?)b/b$1a/g; <-- [morning] --------------------------------------- someone knowledge ends where someone else knowledge starts

lets say i have this simple regex &quot;aYEPb&quot; to &quot;bYEPa&quot; $r =~ s/a(.+?)b/b$1a/gi; now how can i do &quot;aYEcNOPEcPb&quot; to &quot;bYEPc&quot; hope im clear, thanks for the help <-- --------------------------------------- someone knowledge ends where someone else knowledge...

&quot;I'm using a standard IIS web hosting&quot; im assuming your running windows u can change the @INC paths by adding a REG_SZ here HKEY_LOCAL_MACHINE\SOFTWARE\PERLname the REG_SZ : lib value is your full path --------------------------------------- someone knowledge ends where someone...

...for ($posx = 0; $posx < $strlen; $posx++) { $tval = ord(substr($instring,$posx,1)); $h1 = int($tval/16); $h2 = int($tval - ($h1*16)); $retval .= $hexvals[$h1] . $hexvals[$h2]; } return($retval); } sub hex2string { my($instring) = @_; my($retval,$strlen,$posx); $strlen =...

The Common Gateway Interface, or CGI, is a standard for external gateway programs to interface with information servers such as HTTP servers. Such Cgi Script can be written in Perl , C++ , etc ... your question is like : &quot;whats the difference between chocalate and a chocolate bar&quot...

&quot;how can i change the window browser size&quot; window.resizeTo(newwidth, newheight); example full screen : window.moveTo(0,0); window.resizeTo(screen.width, screen.height); &quot;and not have menu etc scroll bars etc&quot; u canot do this in the same window u must luuach a new one ...

Windows Script File <Job Id=&quot;WshShell&quot;> <script language=PerlScript> $WshShell = $WScript->CreateObject(&quot;WScript.Shell&quot;); $WshShell->Run(&quot;notepad&quot;, 5); $WshShell->AppActivate(&quot;Untitled - Notepad&quot;); my $message = &quot;Hello from PerlScript!\n&quot...

...and later and Internet Explorer 4 and later. Compare these two approaches to client sniffing: WRONG WAY RIGHT WAY if (is_nav4 || is_ie4) { /* Code which works on Nav4+, IE4+. Because the if clause only returns true for Nav4 and IE4, the code will never be executed on Netscape 6 and IE5...