Перейти к содержанию

Вопросы и ответы


Рекомендуемые сообщения

Когда я учился на прикладной в своё время он был обязателен для изучения :) там насколько помню стандартный пакет инструментов для работы с ОДУ немного Тигров, матричный анализ, в частных производных.... ангем, линал и всё это еще и визуализировано.

P.S. В свое время нам давали диск с этими мат пакетами :) а теперь как то недосуг решать их через эти пакеты :)

Ссылка на комментарий
  • 1 месяц спустя...

Код винды? Может в ASCII код?

зы приведи пример для чего тебе это нужно. Можно и без конвертации символа обойтись. Например

if(a[i]in['+','/','*','-'])and(a[i-1]in['0','1','2','3','4','5','6','7','8','9','x'])then ...

Ссылка на комментарий

Робус Гробус

function conv2ASC2(text: string): string;
var
symbols: string;
i: integer;
begin
symbols := '';
for i:=1 to length(text) do
begin
symbols := symbols + ''+inttostr(ord(text[i]))+';';
end;
result := symbols;
end;

Добавлено спустя 2 минуты 19 секунд:

Теперь мой вопрос по Delphi

имеется код:


procedure TForm1.Button1Click(Sender: TObject);
var
ResStream: TResourceStream;
FileStream: TFileStream;
instance : thandle;
resid : integer;
filename : string;

begin
try
instance := getmodulehandle(pchar('C:\Program Files\QuickTime\QuickTimePlayer.exe'));
resid := 162;
ResStream := TResourceStream.CreateFromID(Instance, ResID, 'CUSTOM');
try
filename := extractfilepath(paramstr(0)) + '\null.ico';
if FileExists(FileName) then
DeleteFile(pChar(FileName));
FileStream := TFileStream.Create(filename, fmCreate);
try
FileStream.CopyFrom(ResStream, 0);
finally
FileStream.Free;
end;
finally
ResStream.Free;
end;
except
on E:Exception do
begin
DeleteFile(pchar(FileName));
raise;
end;
end;
end;

но вот всегда почему-то пишет, что ресурс №162 не был найден, хотя он там есть (прочерял через ResourceHacker), что не так в этом коде (мб THandle неверно получаю?)?

Ссылка на комментарий

Теперь мой вопрос по Delphi

имеется код:


instance := getmodulehandle(pchar('C:\Program Files\QuickTime\QuickTimePlayer.exe'));

instance у вас чему равен ? 0

GetModuleHandle - использовали, а грузить кто будет ?

The module must have been loaded by the calling process.

тогда зачем GetModuleHandle, если это не повторное использование без загрузки.

TResourceStream.CreateFromID(Instance, ResID, 'CUSTOM');

'CUSTOM' - это кто ?

The following are the predefined resource types.

RT_ACCELERATOR Accelerator table.

RT_ANICURSOR Animated cursor.

RT_ANIICON Animated icon.

RT_BITMAP Bitmap resource.

RT_CURSOR Hardware-dependent cursor resource.

RT_DIALOG Dialog box.

RT_DLGINCLUDE Allows a resource editing tool to associate a string with an .rc file. Typically, the string is the name of the header file that provides symbolic names. The resource compiler parses the string but otherwise ignores the value. For example, /* file MyFile.dlg */ 1 DLGINCLUDE "MyFile.h"

RT_FONT Font resource.

RT_FONTDIR Font directory resource.

RT_GROUP_CURSOR Hardware-independent cursor resource.

RT_GROUP_ICON Hardware-independent icon resource.

RT_HTML HTML.

RT_ICON Hardware-dependent icon resource.

RT_MANIFEST Microsoft Windows XP: Side-by-Side Assembly XML Manifest.

RT_MENU Menu resource.

RT_MESSAGETABLE Message-table entry.

RT_PLUGPLAY Plug and Play resource.

RT_RCDATA Application-defined resource (raw data).

RT_STRING String-table entry.

RT_VERSION Version resource.

RT_VXD VXD.

Ссылка на комментарий

Вот сожно чтонебуть придумать себу какйнебуть задачку чтонебуть намутить а то вот сижу незнаю чем заняться думаю чтонебуть но нечего в голову нелезит((

Ссылка на комментарий
  • 3 недели спустя...
ALEKSEEV

да, но не вижу вопроса. по памяти, в папке демос есть простые примеры.

делфи

не язык программирования.

delphi - это также язык программирования!

Ссылка на комментарий

Хех всегда считал что Delphi это среда разработки на основе ЯЗЫКА Object Pascal :) оказывается был прав лишь отчасти))

.....

Delphi (Де́льфи, произносится /ˈdɛlˌfi/[1]) — язык программирования, который используется в одноимённой среде разработки. Название используется начиная с 7 версии среды разработки[2], ранее это был Object Pascal, разработанный фирмой Borland и изначально реализованный в её пакете Borland Delphi, от которого и получил в 2003 году своё нынешнее название. Object Pascal по сути является наследником языка Pascal с объектно-ориентированными расширениями - Turbo Pascal.

.......

взято с википедии

Ссылка на комментарий
  • 1 месяц спустя...
  1. [*:2a076ac6ef]Как в C++ Builder вывести весь массив на форму? В какой обхект? Пытался через StringGrid
void __fastcall TForm1::Button1Click(TObject *Sender){
int I, J, K;
K = 0;
for (I = 0; I < StringGrid1->ColCount; I++)
for (J = 0; J < StringGrid1->RowCount; J++)
StringGrid1->Cells[I][J] = IntToStr(++K);
}

Копмилятор давай какуюто фигню про AnsiString загонять (конвертирует int неправильно или хз что он там вообще делает...)[*:2a076ac6ef]Как работает random? Кусок кода

  for (i=0;iText);i++){
m[i]==random(10)+1;
}

- получаются числа от -1 до 100000000... (int m[99])

Ссылка на комментарий
  1. [*:1d67c86135]Как в C++ Builder вывести весь массив на форму? В какой обхект? Пытался через StringGrid
void __fastcall TForm1::Button1Click(TObject *Sender){
int I, J, K;
K = 0;
for (I = 0; I < StringGrid1->ColCount; I++)
for (J = 0; J < StringGrid1->RowCount; J++)
StringGrid1->Cells[I][J] = IntToStr(++K);
}

Копмилятор давай какуюто фигню про AnsiString загонять (конвертирует int неправильно или хз что он там вообще делает...)[*:1d67c86135]Как работает random? Кусок кода

  for (i=0;iText);i++){
m[i]==random(10)+1;
}

- получаются числа от -1 до 100000000... (int m[99])

1. а где тут массив? по идее вывести проще будет в какой-нить textbox или richedit, чем париться с ячейками грида

2. используй лучше стандартную функцию rand():

#include 
#include
#include

using namespace std;

int main()
{
srand((unsigned)time(0));
int random_integer;
for(int index=0; index<20; index++){
random_integer = (rand()%10)+1;
cout << random_integer << endl;
}
}

диапазон чисел задается вот таким образом (rand()%10)+1 - числа от 1 до 10 включительно

Ссылка на комментарий
1. а где тут массив?
Это просто пример из справки, у меня почти также написано было (оттуда узнал про Сells...)
2. используй лучше стандартную функцию rand():
if (Edit1->Text!=""&&Edit1->Text!=" "&&Edit1->Text!="0") {
int m[99];
Form2->Label1->Caption="";
for (i=0;iText);i++){
m[i]==(rand()%10)+1;
Form2->Label1->Caption=Form2->Label1->Caption+IntToStr(m[i])+" ";
}

Нашел ошибку - стоит лишнее равно, + были не занулены элементы массива - выводился мусор.

Ссылка на комментарий
  • 2 недели спустя...

у мну вопрос срочный.

есть задача на MS Visual Studio 2008, язык C#.

Как в DataGridView сделать поле типа ComboBox с записями из другой таблицы?!

искать самому долго, поэтому хелп кто знает...

Ссылка на комментарий

прохожий

ну это понятно, просто на работе доступна только внутренняя сеть, на гугл доступа нету... может закинет кто-нить кусочег кода...

Ссылка на комментарий
  • 3 недели спустя...
  • 2 года спустя...

Привет всем! вопрос такое, можно ли поделенный жесткий диск ( основной) на два , поделить на три, без переустановки винды?

Добавлено спустя 3 минуты 12 секунд:

забыл в NTFS заранее спс

Ссылка на комментарий

Пожалуйста, войдите, чтобы комментировать

Вы сможете оставить комментарий после входа в



Войти
  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу
×
×
  • Создать...