Anonymní profil Paulí – Programujte.com

Dobrý den,
prosím Vás o pomoc.

V TTreeView mohu přesunout položku příkazem MoveTo, ale tento příkaz ji může přesunout ze složky do složky. Jakým příkazem lze přesunout položku ve stejné složce o patro nahoru(pořád ve stejné složce), o patro dolu a nebo o adresář výš ?

Děkuji moc za pomoc.
S pozdravem Paulí.

Dobrý den,
prosím vás o pomoc.
Stáhnul jsem si zdrojové kody php(http://www.php.net/downloads.php) a chci si upravit knihovnu "php5ts.dll" a tak jsem si stáhnul program "Visual c++ 2008 Express Edition v. 9.0.21022.8 RTM" a když spustím projektový soubor "php5dllts.dsp", tak mi naběhne spostu souborů obsažené v tomto projektu. Nic nezměním a chci, aby mě z tohoto projektu vypadl soubor "php5ts.dll", a tak v menu označím "Debug/start debuginng". Napíše mi to v angličtině "Tento projekt je zastaralý. Chcete pokračovat ?" a po zakliknutí ano naběhne hláška, že projekt obsahuje chyby.

1>------ Build started: Project: php5dllts, Configuration: Debug_TS Win32 ------
1>Performing Custom Build Step
1>Systém nemůže nalézt uvedený soubor.
1>Project : error PRJ0019: A tool returned an error code from "Performing Custom Build Step"
1>Creating browse information file...
1>Microsoft Browse Information Maintenance Utility Version 9.00.21022
1>Copyright (C) Microsoft Corporation. All rights reserved.
1>BSCMAKE: error BK1506 : cannot open file '.\Debug_TS\cyr_convert.sbr': No such file or directory
1>Build log was saved at "file://c:\Documents and Settings\******\Dokumenty\*****\c++\Nová složka (2)\php-5.2.5\win32\Debug_TS\BuildLog.htm"
1>php5dllts - 2 error(s), 0 warning(s)
========== Build: 0 succeeded, 1 failed, 0 up-to-date, 0 skipped ==========

Kde teda může být chyba, když jsem tam nic neměnil a jenom jsem to spustil.
V té druhé chybě čtu něco o tom,že nemůže nalézt uvedený soubor, přitom ten uvedený soubor není vyžadován žádným souborem z projektu.

Děkuji moc za rady.
S pozdravem Paulí.

Dobrý den.
Prosím vás o pomoc.
Jak mohu v delphi provést akci s objektem u kterého chci část názvu použít z nějaké hodnoty ?

Pro lepší pochopení upřesním - mám objekt ProgressBar1 a chtěl bych k objektu přiřadit někjakou hodnotu (např. Position), ale s tím, že budu mít ProgressBar + hodnota obsahující číslo.Position := číslo; (ProgressBar(hodnota obsahující číslo).Position := číslo;) - Jak to tedy udělám ?

Děkuji moc za rady.
S pozdravem Paulí.

To Garret Raziel :
Ahoj.
je to jednoduché - nejdřív musíš zaregistrovat klávesu a pak zapsat akci po zmáčknutí :

registrace klávesy :
If not RegisterHotkey (Handle, 1, 2, 67) Then ShowMessage('nejde registrovat hot key !!') ;
- místo čísel doplň 1,2,67 doplň čísla klávesy (to 67 by měla být klávesa "c" a ta dvojka znamená v režimu "ctrl" - to znamená, při stisknutí ctrl+c se aktivuje funkce a ta jednička znamená číslo zaregistrované klávesy (číslo každé registrované klávesy musí být jiné) a to číslo použiješ i při odregistrování a to "Handle" znamená pro jakou aplikaci ta klávesa bude registrovaná (v tomto případě bude registrovaná pro tuto aplikaci))

odregistrování klávesy :
UnRegisterHotkey( Handle, 1 ) ;


Takže kompletní kod bude vypadat zhruba takhle:


unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
Procedure WMHotkey( Var msg: TWMHotkey );message WM_HOTKEY;
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
If not RegisterHotkey (Handle, 1, 2, 67) Then ShowMessage('nejde registrovat hot key !!') ;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
UnRegisterHotkey( Handle, 1 ) ;
end;

procedure TForm1.WMHotkey(var msg: TWMHotkey);
begin
If msg.hotkey = 1 Then Begin
If IsIconic( Application.Handle ) Then
Application.Restore;
FormStyle := fsStayOnTop;
FormStyle := fsNormal;
BringToFront;

ShowMessage('zmackl si ctrl+c');
End;
end;

end.


Snad ti to půjde :-).
S pozdravem Paulí.

Dobrý den,
prosím vás o radu.
Tuto otázku jsem pokládal již na jíné forum o webu, ale nedostalo se mi odpovědi, tak pišu sem.
Mám kod který rozliší zda jde o IE nebo ne a podle toho používá JS.

<!--[if IE]> 

<script> 

function video(kvalita) 

{ 

if (kvalita==0){ 

document.all.video.innerHTML='Horší kvalita<br><embed type="application/x-mplayer2" pluginspage="http://www.microsoft.com/Windows/MediaPlayer/" name="mediaplayer1" showstatusbar="1" EnableContextMenu="false" autostart="true" width="176" height="202" transparentstart="1" loop="0" controller="true" src="data/hlavni/horsi-kavarna.avi"></embed><br>Velikost: 4,76 MB<br>'; 

closeIt=""; 

} 

else{ 

document.all.video.innerHTML='Lepší kvalita<br><embed type="application/x-mplayer2" pluginspage="http://www.microsoft.com/Windows/MediaPlayer/" name="mediaplayer1" showstatusbar="1" EnableContextMenu="false" autostart="true" width="352" height="334" transparentstart="1" loop="0" controller="true" src="data/hlavni/lepsi-kavarna.avi"></embed><br>Velikost: 16,6 MB<br>'; 

closeIt=""; 

}} 

</script> 

<![endif]--> 



<!--[if !IE]> --> 

<script> 

function video(kvalita) 

{ 

if (kvalita==0){ 

document.video.document.write('Horší kvalita<br><embed type="application/x-mplayer2" pluginspage="http://www.microsoft.com/Windows/MediaPlayer/" name="mediaplayer1" showstatusbar="1" EnableContextMenu="false" autostart="true" width="176" height="202" transparentstart="1" loop="0" controller="true" src="data/hlavni/horsi-kavarna.avi"></embed><br>Velikost: 4,76 MB<br>'); 

closeIt="document.video.document.close()"; 

} 

else{ 

document.video.document.write('Lepší kvalita<br><embed type="application/x-mplayer2" pluginspage="http://www.microsoft.com/Windows/MediaPlayer/" name="mediaplayer1" showstatusbar="1" EnableContextMenu="false" autostart="true" width="352" height="334" transparentstart="1" loop="0" controller="true" src="data/hlavni/lepsi-kavarna.avi"></embed><br>Velikost: 16,6 MB<br>'); 

closeIt="document.video.document.close()"; 

}} 

</script> 

<!-- <![endif]--> 



<center> 

Video<br> 

<div id="video"></div> 

<input type="button" onclick="video(0)" value='Horší kvalita'> <input type="button" onclick="video(1)" value='Lepší kvalita'><br> 

<IMG src="data/hlavni/kavarna.JPG"> 

</center>